回答編集履歴

- ObjectCreate関数とマウスイベントを駆使して**ダイアログのように見えるもの**を描画しているだけです。

- それだと作るのが大変なので、標準ライブラリにダイアログ用のクラスがあります。

- MT4をインストールしたディレクトリのMQL4\Include\Controlsにソースがあります。

-

- MT4ではなく[MT5のリファレンス](https://www.mql5.com/ja/docs/standardlibrary/controls)を見るのが早いと思います。

-

- インジケータの動作中に移動平均の期間を変更するサンプル

-

- ```MQL4

- #property strict

- #property indicator_chart_window

-

- #property indicator_buffers 3

- #property indicator_plots 3

-

- #property indicator_color1 clrDodgerBlue

- #property indicator_color2 clrGreen

- #property indicator_color3 clrCrimson

-

- #property indicator_width1 1

- #property indicator_width2 2

- #property indicator_width3 3

-

- #include <Controls\Dialog.mqh>

- #include <Controls\Button.mqh>

- #include <Controls\Edit.mqh>

- #include <MovingAverages.mqh>

-

- input int InpPeriod1 = 62;

- input int InpPeriod2 = 200;

- input int InpPeriod3 = 800;

-

- double ExtMa1[];

- double ExtMa2[];

- double ExtMa3[];

-

- int Period1;

- int Period2;

- int Period3;

-

- class CTestDialog : public CAppDialog

- {

- CEdit m_edit1;

- CEdit m_edit2;

- CEdit m_edit3;

- CButton m_button;

-

- public:

- virtual bool Create(const long chart, const string name, const int subwin, const int x1, const int y1,const int x2,const int y2);

- virtual bool OnEvent(const int id, const long &lparam, const double &dparam,const string &sparam);

- void OnClickButton(void);

- };

-

- EVENT_MAP_BEGIN(CTestDialog)

- ON_EVENT(ON_CLICK, m_button, OnClickButton)

- EVENT_MAP_END(CAppDialog)

-

- bool CTestDialog::Create(const long chart, const string name, const int subwin, const int x1, const int y1, const int x2, const int y2)

- {

- CAppDialog::Create(chart, name, subwin, x1, y1, x2, y2);

-

- int x = 5;

- int y = 5;

- int w = 60;

- int h = 20;

- int margin = 5;

-

- m_edit1.Create(m_chart_id, m_name + "Edit1", m_subwin, x, y, x + w, y + h);

- m_edit1.Text(IntegerToString(Period1));

- Add(m_edit1);

-

- y += h + margin;

-

- m_edit2.Create(m_chart_id, m_name + "Edit2", m_subwin, x, y, x + w, y + h);

- m_edit2.Text(IntegerToString(Period2));

- Add(m_edit2);

-

- y += h + margin;

-

- m_edit3.Create(m_chart_id, m_name + "Edit3", m_subwin, x, y, x + w, y + h);

- m_edit3.Text(IntegerToString(Period3));

- Add(m_edit3);

-

- y += h + margin;

-

- m_button.Create(m_chart_id, m_name + "Button", m_subwin, x, y, x + w, y + h);

- m_button.Text("Update");

- Add(m_button);

-

- return true;

- }

-

- void CTestDialog::OnClickButton(void)

- {

- int period1 = StrToInteger(m_edit1.Text());

- int period2 = StrToInteger(m_edit2.Text());

- int period3 = StrToInteger(m_edit3.Text());

-

- if (period1 <= 0 || period2 <= 0 || period3 <= 3)

- {

- return;

- }

-

- Period1 = period1;

- Period2 = period2;

- Period3 = period3;

-

- PlotIndexSetInteger(0, PLOT_DRAW_BEGIN, Period1 - 1);

- PlotIndexSetInteger(1, PLOT_DRAW_BEGIN, Period2 - 1);

- PlotIndexSetInteger(2, PLOT_DRAW_BEGIN, Period3 - 1);

-

- ChartSetSymbolPeriod(0, NULL, PERIOD_CURRENT);

- }

-

- CTestDialog ExtDialog;

-

- int OnInit()

- {

- Period1 = InpPeriod1;

- Period2 = InpPeriod2;

- Period3 = InpPeriod3;

-

- SetIndexBuffer(0, ExtMa1);

- SetIndexBuffer(1, ExtMa2);

- SetIndexBuffer(2, ExtMa3);

-

- PlotIndexSetInteger(0, PLOT_DRAW_BEGIN, Period1 - 1);

- PlotIndexSetInteger(1, PLOT_DRAW_BEGIN, Period2 - 1);

- PlotIndexSetInteger(2, PLOT_DRAW_BEGIN, Period3 - 1);

-

- if(!ExtDialog.Create(0, "MA3", 0, 20, 20, 100, 160))

- {

- return INIT_FAILED;

- }

-

- ExtDialog.Run();

-

- return INIT_SUCCEEDED;

- }

-

- void OnDeinit(const int reason)

- {

- ExtDialog.Destroy(reason);

- }

-

- int OnCalculate(const int rates_total,

- const int prev_calculated,

- const datetime &time[],

- const double &open[],

- const double &high[],

- const double &low[],

- const double &close[],

- const long &tick_volume[],

- const long &volume[],

- const int &spread[])

- {

- ArraySetAsSeries(ExtMa1, false);

- ArraySetAsSeries(ExtMa2, false);

- ArraySetAsSeries(ExtMa3, false);

- ArraySetAsSeries(close, false);

-

- int minPeriod = MathMin(Period1, MathMin(Period2, Period3));

- int first = MathMax(minPeriod - 1, prev_calculated - 1);

-

- for (int i = first; i < rates_total; i++)

- {

- if (i == (Period1 - 1))

- ExtMa1[i] = SimpleMA(i, Period1, close);

- else if (i >= (Period1 - 1))

- ExtMa1[i] = ExponentialMA(i, Period1, ExtMa1[i - 1], close);

-

- if (i >= (Period2 - 1))

- ExtMa2[i] = SimpleMA(i, Period2, close);

-

- if (i >= (Period3 - 1))

- ExtMa3[i] = SimpleMA(i, Period3, close);

- }

-

- return rates_total;

- }

-

- void OnChartEvent(const int id,

- const long &lparam,

- const double &dparam,

- const string &sparam)

- {

- ExtDialog.ChartEvent(id,lparam,dparam,sparam);

- }

-