Обсуждение статьи "Улучшаем работу с Панелями: добавляем прозрачность, меняем цвет фона и наследуемся от CAppDialog/CWndClient" - Статьи и техническая библиотека по автоматическому трейдингу

Rashid Umarov 2018.04.25 08:40 #1

Форум по трейдингу, автоматическим торговым системам и тестированию торговых стратегий

Обсуждение статьи "Как создать графическую панель любой сложности и как это работает"

Rashid Umarov, 2018.04.23 10:30

Двойной клик - это два клика, между которыми совсем малый промежуток времени. Значит, обрабатываться может так же, как и обычный клик - нужно только добавить статическую переменную в OnChartEvent. Посмотрите пример в https://www.mql5.com/ru/docs/constants/chartconstants/enum_chartevents и сделайте примерно так:

....

Покажем на примере, как добавить обработку двойного клика на панели. Внесем правки в класс CMyWndClient

1. Переопределим виртуальный метод OnDblClick, который тянется еще из предка CWnd

class CMyWndClient : public CWndClient
  {
private:
   CButton           m_button1;                       // the button object
   CButton           m_button2;                       // the button object
   //--- scroll size
   int               m_scroll_size;                   // scroll_size
   //--- храним владельца
   CAppDialog        m_owner;                         // owner
   //--- скрывать невидимое
   bool              m_hide_invisble;
   //---
   bool              AddButton1(void);
   bool              AddButton2(void);
protected:
   //--- handlers of the dependent controls events
   void              OnClickButton1(void);
   void              OnClickButton2(void);
   void              OnShowScrollH(void);
   virtual bool      OnScrollLineRight(void);
   virtual bool      OnScrollLineLeft(void);
   virtual bool      OnDblClick(void);
.....
//+------------------------------------------------------------------+
//|  переопределим обработку события OnDblClick                      |
//+------------------------------------------------------------------+
bool CMyWndClient::OnDblClick(void)
  {
   Print(__FUNCTION__);
   return ColorBackground(GetRandomColor());
  }

2. Добавим обработку этого события

//+------------------------------------------------------------------+
//| Event Handling                                                   |
//+------------------------------------------------------------------+
EVENT_MAP_BEGIN(CMyWndClient)
ON_EVENT(ON_CLICK,m_button1,OnClickButton1)
ON_EVENT(ON_CLICK,m_button2,OnClickButton2)
ON_EVENT(ON_DBL_CLICK,this,OnDblClick)
ON_EVENT(ON_SHOW,m_scroll_h,OnShowScrollH)
EVENT_MAP_END(CWndClient)

3. В файле приложения MyWndClient.mq5 добавим строки по отлову события DoubleClick

//+------------------------------------------------------------------+
//| Expert chart event function                                      |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,         // event ID  
                  const long& lparam,   // event parameter of the long type
                  const double& dparam, // event parameter of the double type
                  const string& sparam) // event parameter of the string type
  {
//--- время последнего клика мышки
   static uint last_click=0;
//--- нажатие левой кнопкой мышки на графике
   if(id==CHARTEVENT_OBJECT_CLICK)   
     {
      uint click_time=GetTickCount();
      //Print("click_time=",click_time);
      //Print("Координаты щелчка мышки на графике: x = ",lparam,"  y = ",dparam);
      if(click_time-last_click<dbl_click_time)
        {
         PrintFormat("DoubleClick! time=%d msec",click_time-last_click);
         // отправим событие ON_DBL_CLICK клиентской области - пусть обработает 
         EventChartCustom(CONTROLS_SELF_MESSAGE,ON_DBL_CLICK,ClientArea.Id(),dparam,ClientArea.Name());       
        }
      last_click=click_time;
      //---
     }
   AppWindow.ChartEvent(id,lparam,dparam,sparam);
  }

Добавим во внешний параметр приложения время между кликами в миллисекундах - если оно меньше указанного, будет генерироваться событие DoubleClick

//+------------------------------------------------------------------+
//|                                                  MyWndClient.mq5 |
//|                        Copyright 2018, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.001"
#property description "Приложение MyWndClient на основе класса CMyWndClient"
#property description "Добавлены кнопки для установки цвета фона и заголовка"
#include "MyWndClient.mqh"
#include <Controls\Dialog.mqh>
#include <Controls\Button.mqh>
//--- input parameter
input bool InpTwoButtonsVisible=false; // ширина панели
input bool HideInvisble=false;         // скрыть невидимое
input uint dbl_click_time=500;         // период между кликами в msec

Файлы приложены. Можно смотреть как по отдельности, так и распаковать архив в папку MQL5\Experts

Файлы:

MyWndClient.zip 5 kb

MyWndClient.mq5 9 kb

MyWndClient.mqh 25 kb

Обсуждение статьи "Как создать а такое возможно? Любые вопросы новичков по

Rashid Umarov 2018.04.25 08:46 #2

На видео показано, что событие двойного клика отрабатывает только на панели. Вне панели событие не перехватывается.

https://c.mql5.com/3/185/MyWndClient_DblClick.gif

Файлы:

MyWndClient_DoubleClick.zip 242 kb

Photic 2019.02.01 13:27 #3

Интересно, можно ли сделать панель непрозрачной для мыши. При перетаскивании и даже редактировании в поле Edit цепляются объекты на графике, стопы перетаскиваются.

Vyacheslav Nekipelov 2019.02.02 06:12 #4

Photic:
Интересно, можно ли сделать панель непрозрачной для мыши. При перетаскивании и даже редактировании в поле Edit цепляются объекты на графике, стопы перетаскиваются.

Плюсую. Очень часто стопы и тейки задеваются таким образом.

Можно пробовать решать это изменением их вида на виртуальные - если линии не выбраны для редактирования, перенос панели их не цепляет.

И еще ...было бы классно узнать, как сделать вывод текущей информации (например, профит по открытым Buy или Sell или любую изменяющуюся текущую информацию) в само окно панели?

Может, кто-то делал что-либо подобное. МТ4.

Любой вопрос новичка, чтоб Как в MQL5 узнать, Обсуждение статьи "Рецепты MQL5

Vladimir Karputov 2019.02.02 08:22 #5

Vyacheslav Nekipelov:

***

И еще ...было бы классно узнать, как сделать вывод текущей информации (например, профит по открытым Buy или Sell или любую изменяющуюся текущую информацию) в само окно панели?

Может, кто-то делал что-либо подобное. МТ4.

Выводить в панель можно что угодно - необходимо только прописать новые методы ответственные за вывод.

Но для старого терминала неинтересно.

Вот пример панели, которая выводит информацию о позициях: https://www.mql5.com/ru/code/16931

Vyacheslav Nekipelov 2019.02.02 09:14 #6

Vladimir Karputov:

Вот пример панели, которая выводит информацию о позициях: https://www.mql5.com/ru/code/16931

Спасибо большое) Нужно будет как-то посмотреть эту тему.

Vasiliy Pushkaryov 2020.06.06 21:45 #7

Спасибо, Владимир, за эту и предыдущую статью. Несколько новых полезных моментов для себя почерпнул.

У Вас не получилось увидеть, почему первый раз заголовок закрашивается вместе с кнопками закрытия, а после сворачивания/разворачивания изменения цветов уже не влияют на элементы управления?

Новая версия платформы MetaTrader Вопросы по ООП в Новая версия платформы MetaTrader

Vladimir Karputov 2020.06.07 04:07 #8

Vasiliy Pushkaryov:

Спасибо, Владимир, за эту и предыдущую статью. Несколько новых полезных моментов для себя почерпнул.

У Вас не получилось увидеть, почему первый раз заголовок закрашивается вместе с кнопками закрытия, а после сворачивания/разворачивания изменения цветов уже не влияют на элементы управления?

Я обнаружил причину. Посмотрите на ширину заголовка после первого запуска и после сворачивания/разворачивания:

Ширина заголовка после первого запуска

Рис. 1. Ширина заголовка после первого запуска

Ширина заголовка после сворачивания/разворачивания

Рис. 2. Ширина заголовка после сворачивания/разворачивания

Vasiliy Pushkaryov 2020.06.07 07:04 #9

Vladimir Karputov:

Я обнаружил причину. Посмотрите на ширину заголовка после первого запуска и после сворачивания/разворачивания:

Отлично, спасибо. Добавил в код одну строку и нажатие по кнопке стало закрашивать заголовок полностью.

//+------------------------------------------------------------------+
//| Event handler                                                    |
//+------------------------------------------------------------------+
void CLivePaneButtonClicks::OnClickButton2(void)
  {
   string prefix=Name();
   int total=ExtDialog.ControlsTotal();
   for(int i=0;i<total;i++)
     {
      CWnd*obj=ExtDialog.Control(i);
      string name=obj.Name();
      //---
      if(name==prefix+"Caption")
        {
         CEdit *edit=(CEdit*) obj;
         color clr=(color)GETRGB(XRGB(rand()%255,rand()%255,rand()%255));
         edit.ColorBackground(clr);
         edit.Width(336);
         ChartRedraw();
         return;
        }
     }
  }

Теперь можно просто переопределить этот момент в функциях

virtual void Minimize(void);
virtual void Maximize(void);

И все будет в порядке.

Но я с Вашего позволения напомню пару раз в ветках с новыми билдами об этой особенности. Может поправят.

Особенности языка mql5, тонкости Как теперь выводить деньги Сложности MQL4

Denis Kirichenko 2020.10.03 12:38 #10

Владимир, спасибо за статьи, очень полезный материал. У меня может быть ламерский вопрос...

Есть объект типа CBmpButton - кнопка с изображением. Так вот, само изображение кнопки выступает тут в качестве ресурса. Как получить доступ к его свойствам? Или нельзя?

Пример из Документации.

Там я поиграл с методом CControlsDialog::CreateBmpButton1():

//+------------------------------------------------------------------+
//| Create the "BmpButton1" button                                   |
//+------------------------------------------------------------------+
bool CControlsDialog::CreateBmpButton1(void)
  {
//--- coordinates
   int x1 = INDENT_LEFT;
   int y1 = INDENT_TOP + (EDIT_HEIGHT + CONTROLS_GAP_Y);
   int x2 = x1 + BUTTON_WIDTH;
   int y2 = y1 + BUTTON_HEIGHT;
//--- create
   if(!m_bmpbutton1.Create(m_chart_id, m_name + "BmpButton1", m_subwin, x1, y1, x2, y2))
      return(false);
//--- sets the name of bmp files of the control CBmpButton
   string name1, name2;
   name1 = "\\Images\\euro.bmp";
   name2 = "\\Images\\dollar.bmp";
   m_bmpbutton1.BmpNames(name1, name2);
   if(!Add(m_bmpbutton1))
      return(false);
   m_chart.Redraw();
   if(ObjectFind(m_chart_id, name1) >= 0)
     {
      DebugBreak();
     }
//--- succeed
   return(true);
  }
//+------------------------------------------------------------------+

Объект самого изображения на панели не находится с помощью функции ObjectFind(), что вполне ест-но. А как его найти, если это вообще возможно?

Спасибо.

Элитные показатели :) Как получить событие нажатия Любые вопросы новичков по