新功能實現(xiàn)階段

我們來定義主要元素和實現(xiàn)方法，類似于開發(fā)策略構(gòu)建器初期時所做的工作。 在創(chuàng)建界面的?CreateGUI()?主要方法中，添加了兩個方法。 我們看一下這些方法，以及針對現(xiàn)有方法的補充。

//+------------------------------------------------------------------+ //| Creates the graphical interface of the program ? ? ? ? ? ? ? ? ? | //+------------------------------------------------------------------+ bool CProgram::CreateGUI(void) { //--- Create a panel ?? if(!CreateWindow("Merrill Constructor")) ??????return(false); //--- Create a dialog window ?? if(!CreateDateSetting()) ??????return(false); //--- Create a chart window ?? if(!CreateGraphWindow()) ??????return(false); //--- Create a load window ?? if(!CreateLoading()) ??????return(false); //--- Finish the creation of GUI ?? CWndEvents::CompletedGUI(); ?? return(true); }

我們觀察主窗口創(chuàng)建方法?CreateWindow()?中的更改：為實現(xiàn)新的測試工具，添加了如圖例 1 所示的新界面元素。赫茲股票量化交易軟件

//---- CONSTRUCTOR tab .... //--- ?? if(!CreateProfitType(int(0.35*(m_window[0].XSize()-150)-120),50+35*6+ygap)) ??????return(false); ?? if(!CreateLotType(int(0.6*(m_window[0].XSize()-150)-120),50+35*6+ygap)) ??????return(false); ?? if(!CreateBaseLotValue(int(0.85*(m_window[0].XSize()-150)-120),50+35*6+ygap)) ??????return(false); ?? if(!CreateInitialDeposit(int(0.35*(m_window[0].XSize()-150)-120),50+35*7+ygap)) ??????return(false); //--- ?? if(!CreateReportFrame(m_frame[2],int(0.35*(m_window[0].XSize()-150)-120),110+35*7+ygap)) ??????return(false); //--- Graph opening button ?? if(!CreateIconButton(int(0.35*(m_window[0].XSize()-150)-50),100+35*7+ygap)) ??????return(false); //--- Report lines ?? for(int i=0; i<11; i++) ?? { ??????if(i<5) ???????? if(!CreateTextLabel(m_report_text[i],int(0.37*(m_window[0].XSize()-150)-120),380+25*i+ygap,"",0)) ????????????return(false); ??????if(i>=5 && i<9) ???????? if(!CreateTextLabel(m_report_text[i],int(0.63*(m_window[0].XSize()-150)-120),380+25*(i-5)+ygap,"",0)) ????????????return(false); ??????if(i>=9) ???????? if(!CreateTextLabel(m_report_text[i],int(0.89*(m_window[0].XSize()-150)-120),380+25*(i-9)+ygap,"",0)) ????????????return(false); ??????m_report_text[i].IsCenterText(false); ??????m_report_text[i].FontSize(10); ?? } ....

視覺更改僅在“構(gòu)造器”選項卡中實現(xiàn)。 附件和上一篇文章中提供了完整的選項卡實現(xiàn)代碼，而此處僅展示新的方法。 我們來逐一研究它們。?赫茲股票量化交易軟件

CreateProfitType(). 該方法為測試中用到的利潤類型創(chuàng)建一個下拉列表：存款幣種，或點數(shù)。

//+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ bool CProgram::CreateProfitType(const int x_gap,const int y_gap) { //--- Pass the object to the panel ?? m_profit_type.MainPointer(m_tabs1); //--- Attach to tab ?? m_tabs1.AddToElementsArray(0,m_profit_type); //--- Array of the item values in the list view ?? string pattern_names[2]= ?? { ??????"Pips","Currency" ?? }; //--- Set properties before creation ?? m_profit_type.XSize(200); ?? m_profit_type.YSize(25); ?? m_profit_type.ItemsTotal(2); ?? m_profit_type.FontSize(12); ?? m_profit_type.LabelColor(C'0,100,255'); ?? m_profit_type.GetButtonPointer().FontSize(10); ?? m_profit_type.GetButtonPointer().XGap(80); ?? m_profit_type.GetButtonPointer().XSize(100); ?? m_profit_type.GetButtonPointer().BackColor(clrAliceBlue); ?? m_profit_type.GetListViewPointer().FontSize(10); ?? m_profit_type.GetListViewPointer().YSize(44); //--- Save the item values in the combobox list view ?? for(int i=0; i<2; i++) ??????m_profit_type.SetValue(i,pattern_names[i]); //--- Get the list view pointer ?? CListView *lv=m_profit_type.GetListViewPointer(); //--- Set the list view properties ?? lv.LightsHover(true); ?? m_profit_type.SelectItem(1); //--- Create a control ?? if(!m_profit_type.CreateComboBox("Profit Type",x_gap,y_gap)) ??????return(false); //--- Add the object to the common array of object groups ?? CWndContainer::AddToElementsArray(0,m_profit_type); ?? return(true); }

CreateLotType(). 該方法為手數(shù)類型創(chuàng)建一個下拉列表，常量，或依據(jù)余額。

//+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ bool CProgram::CreateLotType(const int x_gap,const int y_gap) { //--- Pass the object to the panel ?? m_lot_type.MainPointer(m_tabs1); //--- Attach to tab ?? m_tabs1.AddToElementsArray(0,m_lot_type); //--- Array of the item values in the list view ?? string pattern_names[2]= ?? { ??????"Balance","Constant" ?? }; //--- Set properties before creation ?? m_lot_type.XSize(200); ?? m_lot_type.YSize(25); ?? m_lot_type.ItemsTotal(2); ?? m_lot_type.FontSize(12); ?? m_lot_type.LabelColor(C'0,100,255'); ?? m_lot_type.GetButtonPointer().FontSize(10); ?? m_lot_type.GetButtonPointer().XGap(65); ?? m_lot_type.GetButtonPointer().XSize(100); ?? m_lot_type.GetButtonPointer().BackColor(clrAliceBlue); ?? m_lot_type.GetListViewPointer().FontSize(10); ?? m_lot_type.GetListViewPointer().YSize(44); //--- Save the item values in the combobox list view ?? for(int i=0; i<2; i++) ??????m_lot_type.SetValue(i,pattern_names[i]); //--- Get the list view pointer ?? CListView *lv=m_lot_type.GetListViewPointer(); //--- Set the list view properties ?? lv.LightsHover(true); ?? m_lot_type.SelectItem(1); //--- Create a control ?? if(!m_lot_type.CreateComboBox("Lot Type",x_gap,y_gap)) ??????return(false); //--- Add the object to the common array of object groups ?? CWndContainer::AddToElementsArray(0,m_lot_type); ?? return(true); }

CreateBaseLotValue(). 該方法為手數(shù)值創(chuàng)建輸入字段。

/+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ bool CProgram::CreateBaseLotValue(const int x_gap,const int y_gap) { //--- Save the pointer to the main control ?? m_base_lot.MainPointer(m_tabs1); //--- Attach to tab ?? m_tabs1.AddToElementsArray(0,m_base_lot); //--- Properties ?? m_base_lot.XSize(210); ?? m_base_lot.YSize(24); ?? m_base_lot.LabelColor(C'0,100,255'); ?? m_base_lot.FontSize(12); ?? m_base_lot.MaxValue(SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MAX)); ?? m_base_lot.MinValue(SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN)); ?? m_base_lot.StepValue(SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_STEP)); ?? m_base_lot.SetDigits(2); ?? m_base_lot.SpinEditMode(true); ?? m_base_lot.GetTextBoxPointer().AutoSelectionMode(true); ?? m_base_lot.GetTextBoxPointer().XGap(100); //--- Create a control ?? if(!m_base_lot.CreateTextEdit("Base Lot Size",x_gap,y_gap)) ??????return(false); ?? m_base_lot.SetValue((string)SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN)); //--- Add the object to the common array of object groups ?? CWndContainer::AddToElementsArray(0,m_base_lot); ?? return(true); }

CreateInitialDeposit(). 在“利潤 —幣種”模式下進行測試時，為初始存款創(chuàng)建一個輸入字段。

//+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ bool CProgram::CreateInitialDeposit(const int x_gap,const int y_gap) { //--- Save the pointer to the main control ?? m_init_deposit.MainPointer(m_tabs1); //--- Attach to tab ?? m_tabs1.AddToElementsArray(0,m_init_deposit); //--- Properties ?? m_init_deposit.XSize(210); ?? m_init_deposit.YSize(24); ?? m_init_deposit.LabelColor(C'0,100,255'); ?? m_init_deposit.FontSize(12); ?? m_init_deposit.MinValue(10); ?? m_init_deposit.SetDigits(2); ?? m_init_deposit.GetTextBoxPointer().AutoSelectionMode(true); ?? m_init_deposit.GetTextBoxPointer().XGap(125); //--- Create a control ?? if(!m_init_deposit.CreateTextEdit("Initial Deposit",x_gap,y_gap)) ??????return(false); ?? m_init_deposit.SetValue((string)1000); //--- Add the object to the common array of object groups ?? CWndContainer::AddToElementsArray(0,m_init_deposit); ?? return(true); }

CreateIconButton(). 創(chuàng)建一個按鈕，點擊后會打開圖表窗口。

//+------------------------------------------------------------------+ //| Creates a button with an image?????????????????????????????????? | //+------------------------------------------------------------------+ #resource "\\Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart.bmp" #resource "\\Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart_gray.bmp" //--- bool CProgram::CreateIconButton(const int x_gap,const int y_gap) { //--- Save the pointer to the main control ?? m_graph_button.MainPointer(m_tabs1); //--- Attach to tab ?? m_tabs1.AddToElementsArray(0,m_graph_button); //--- Properties ?? m_graph_button.XSize(150); ?? m_graph_button.YSize(22); ?? m_graph_button.FontSize(11); ?? m_graph_button.IconXGap(3); ?? m_graph_button.IconYGap(3); ?? m_graph_button.IsHighlighted(false); ?? m_graph_button.IsCenterText(true); ?? m_graph_button.IconFile("Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart.bmp"); ?? m_graph_button.IconFileLocked("Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart_gray.bmp"); ?? m_graph_button.IconFilePressed("Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart.bmp"); ?? m_graph_button.IconFilePressedLocked("Images\\EasyAndFastGUI\\Icons\\bmp16\\bar_chart_gray.bmp"); ?? m_graph_button.BorderColor(C'0,100,255'); ?? m_graph_button.BackColor(clrAliceBlue); //--- Create a control ?? if(!m_graph_button.CreateButton("",x_gap,y_gap)) ??????return(false); //--- Add the element pointer to the data base ?? CWndContainer::AddToElementsArray(0,m_graph_button); ?? return(true); }

在?CreateWindow()?中修改了報告特征的輸出結(jié)構(gòu)。 它追加并實現(xiàn)為三列，取代了原先的兩列。 所有這些就是在主窗口創(chuàng)建方法?CreateWindow()?中進行的修改。赫茲股票量化交易軟件

接下來，我們繼續(xù)實現(xiàn)圖表窗口和報表圖形的方法 —?CreateGraphWindow()。

//+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ bool CProgram::CreateGraphWindow(void) { //--- Add the pointer to the window array ?? CWndContainer::AddWindow(m_window[2]); //--- Properties ?? m_window[2].XSize(750); ?? m_window[2].YSize(450); ?? m_window[2].FontSize(9); ?? m_window[2].WindowType(W_DIALOG); ?? m_window[2].IsMovable(true); //--- Create the form ?? if(!m_window[2].CreateWindow(m_chart_id,m_subwin,"",75,75)) ??????return(false); ?? //--- Charts ?? if(!CreateGraph(22,22)) ??????return(false); //--- ?? return(true); }

創(chuàng)建方法很小巧。 請注意其中包含的?CreateGraph()?方法。赫茲股票量化交易軟件

//+------------------------------------------------------------------+ //| Create a chart ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? | //+------------------------------------------------------------------+ bool CProgram::CreateGraph(const int x_gap,const int y_gap) { //--- Save the pointer to the main control ?? m_graph1.MainPointer(m_window[2]); //--- Properties ?? m_graph1.AutoXResizeMode(true); ?? m_graph1.AutoYResizeMode(true); ?? m_graph1.AutoXResizeRightOffset(10); ?? m_graph1.AutoYResizeBottomOffset(10); //--- Create element ?? if(!m_graph1.CreateGraph(x_gap,y_gap)) ??????return(false); //--- Chart properties ?? CGraphic *graph=m_graph1.GetGraphicPointer(); ?? graph.BackgroundColor(::ColorToARGB(clrWhiteSmoke)); ?? graph.XAxis().Min(0); ?? graph.BackgroundMainSize(20); ?? graph.HistoryNameSize(0); ?? graph.HistorySymbolSize(0); ?? graph.HistoryNameWidth(0); //--- Add the element pointer to the data base ?? CWndContainer::AddToElementsArray(2,m_graph1); ?? return(true); }

它創(chuàng)建一個空圖形，并設置其視覺特征。 圖形數(shù)據(jù)將在以后添加。

在主要的?CreateGUI()?中的另一個方法是?CreateLoading()，其會創(chuàng)建加載窗口。 它以指標形式負責加載應用程序、更改語言設置、以及處理數(shù)據(jù)和測試。赫茲股票量化交易軟件

//+------------------------------------------------------------------+ //|??????????????????????????????????????????????????????????????????| //+------------------------------------------------------------------+ #resource "\\Images\\EasyAndFastGUI\\Icons\\bmp16\\sandglass.bmp" bool CProgram::CreateLoading(void) { //--- Add the pointer to the window array ?? CWndContainer::AddWindow(m_window[3]); //--- Properties ?? m_window[3].XSize(100); ?? m_window[3].YSize(50); ?? m_window[3].LabelYGap(50/2-16/2); ?? m_window[3].IconYGap(50/2-16/2); ?? m_window[3].FontSize(9); ?? m_window[3].WindowType(W_DIALOG); ?? m_window[3].IsMovable(false); ?? m_window[3].CloseButtonIsUsed(false); ?? m_window[3].CaptionColorLocked(C'0,130,225'); ?? m_window[3].LabelColor(clrWhite); ?? m_window[3].LabelColorLocked(clrWhite); ?? m_window[3].CaptionHeight(51); ?? m_window[3].IconFile("Images\\EasyAndFastGUI\\Icons\\bmp16\\sandglass.bmp"); ?? m_window[3].IconFileLocked("Images\\EasyAndFastGUI\\Icons\\bmp16\\sandglass.bmp"); ?? m_window[3].IconFilePressed("Images\\EasyAndFastGUI\\Icons\\bmp16\\sandglass.bmp"); ?? m_window[3].IconFilePressedLocked("Images\\EasyAndFastGUI\\Icons\\bmp16\\sandglass.bmp"); ?? int x=int(m_window[0].XSize()/2); ?? int y=int(m_window[0].YSize()/2); //--- Create the form ?? if(!m_window[3].CreateWindow(m_chart_id,m_subwin,"Working...",x,y)) ??????return(false); ?? return(true); }

我們已研究了策略構(gòu)建器的視覺元素。 我們進入測試算法，并觀察如何利用新的視覺控件在其中顯示信息。