Metatrader Forum | Forex Expert-Advisor | Broker & Forex Tools - MyAlert, bequeme und einfache Fehlerbehandlung

Metatrader Forum | Forex Expert-Advisor | Broker & Forex Tools (http://www.expert-advisor.com/forum/index.php)

- Codeschnipsel (http://www.expert-advisor.com/forum/forumdisplay.php?f=292)

- - MyAlert, bequeme und einfache Fehlerbehandlung (http://www.expert-advisor.com/forum/showthread.php?t=5362)

MyAlert, bequeme und einfache Fehlerbehandlung

Fehler abzufangen ist wichtig, Informationen über den Fehler auszugeben hilfreich.
Das wird aber oft als mühsam empfunden und deshalb oft weggelassen.
Mir geht es jedenfalls so.
Weiters sind mehrere Programmzeilen notwendig, der Code wird auch nicht kompakter dadurch, der Fehler sollte ja auch noch zurückgesetzt werden.
Also habe ich MyAlert.mqh implementiert.
Der nächste Codeschnipsel wird diese Funktion verwenden, gleich als Anwendungsbeispiel.
Ist nicht getestet, sollte aber auch unter MQL4 laufen.

Code:

//+------------------------------------------------------------------+

//|                                                      MyAlert.mqh |

//|                                Copyright © 2016 Ing. Otto Pauser |

//+------------------------------------------------------------------+

//| Bequeme und sichere Fehlerbehandlung. 3 überladene Funktionen    |

//| 1. MyAlert(max 6 Parameter Typ String)                           |

//| 2. MyAlert(int AnyRetval, max 6 Parameter Typ String)            |

//| 3. MyAlert(ENUM_INIT_RETCODE Retval, max 6 Parameter Typ String) |

//|                                                                  |

//| Das Macro StdErrMsg kann nur von der aufrufenden Funktion        |

//| verwendet werden, da ja hier sinnlos und vom Compiler abgelehnt  |

//+------------------------------------------------------------------+



#include <ErrorDescription.mqh>        // falls nicht vorhanden, hier ist der downloadlink:  https://www.mql5.com/en/code/79

                                       // ist nicht ganz aktuell, aber der Service-Desk ist informiert und wird das demnächst aktualisieren

static bool AlertPrintOnly = false;    // Steuerung des Verhaltens bei Fehler. Nur Print, oder Print + Alert



#define StdErrMsg ", Function: "+__FUNCTION__+"(), Line:"+(string)__LINE__    // nur in der aufrufenden Funktion verwendbar

                                                                              // hier wird der ganze Text zusammengebastelt

string StringMake(string str1="", string str2="", string str3="", string str4="", string str5="", string str6="")

{

   string       ErrMsg = str1;

   if(str2=="") return(ErrMsg); else ErrMsg = ErrMsg+" "+str2;

   if(str3=="") return(ErrMsg); ErrMsg = ErrMsg+" "+str3;

   if(str4=="") return(ErrMsg); ErrMsg = ErrMsg+" "+str4;

   if(str5=="") return(ErrMsg); ErrMsg = ErrMsg+" "+str5;

   if(str6=="") return(ErrMsg); ErrMsg = ErrMsg+" "+str6;

   return(ErrMsg);

}

                           // in OnInit() gut plaatziert oder auch allgemeine Verwendung

int MyAlert(string str1="", string str2="", string str3="", string str4="", string str5="", string str6="")

{

   string ErrMsg="*ERROR* "+IntegerToString(GetLastError())+" - "+ErrorDescription(GetLastError())+" ";

   ErrMsg = ErrMsg + StringMake(str1, str2, str3, str4, str5, str6);

   

   Print(ErrMsg);          // print the errormessage

   

   if(AlertPrintOnly)

      PlaySound("Alert");

   else   

      Alert(ErrMsg);       // do the alert if requested

      

   ResetLastError();       // reset lasterror

   return(INIT_FAILED);

}

                           // ist diversn Einsatz vorgesehen der Rückgabe benütigt

int MyAlert(int aRetVal, string str1="", string str2="", string str3="", string str4="", string str5="", string str6="")

{

   MyAlert(str1, str2, str3, str4, str5, str6);

   return(aRetVal);

}

                           // ist für die OnInit() vorgesehen

int MyAlert(ENUM_INIT_RETCODE aRetVal, string str1="", string str2="", string str3="", string str4="", string str5="", string str6="")

{

   MyAlert(str1, str2, str3, str4, str5, str6);

   return(aRetVal);

}

Viel Erfolg damit.

PS: Falls jemand Verbesserungmöglichkeiten sieht, nur her damit.
PPS: Wollte noch die Datei im nachhinein anhängen, geht aber nicht bei Änderung. Ich versuche es nochmals nach dem nächsten Post der schon draussen ist

Ein PowerTool zum gleichschalten aller offenen Charts

Das ist gleich ein Beispiel für die Verwendun von MyAlert.mqh

Die Einstellungen eines Charts auf alle anderen offenen Charts anwenden.
Verwendet die Funktionen ChartSaveTemplate() und ChartApplyTemplate().

Ist nicht wirklich auf meinem Mist gewachsen, aber ist wesentlich verbessert worden.
Und mit ErrorCheck!

Code:

//+------------------------------------------------------------------+

//|                                                ApplyTemplate.mq5 |

//|                                Copyright © 2017 Ing. Otto Pauser |

//|                                        https://www.opa-trader.at |

//+------------------------------------------------------------------+

#property copyright "Copyright © 2017 Ing. Otto Pauser"

#property link      "https://www.opa-trader.at"

#property version   "1.00"



#include <MyAlert.mqh>



string TmplName = "LastApplied";       // unter diesem Namen wird die aktuelle Einstellung gespeichert

                                       // wird immer kommentarlos überschrieben

void OnStart()

{

   ENUM_TIMEFRAMES initPeriod  = _Period;             // Werte des aktuellen Charts merken

   long            initScale   = ChartGetInteger(ChartID(),CHART_SCALE);

   long            initChartID = ChartID();

   long            currChartID = ChartFirst();        // Schleifenvariable über alle Charts



   if(!ChartSaveTemplate(initChartID,TmplName))       // hier wird die aktuelle Einstellung in Datei geschrieben

      MyAlert(StdErrMsg);

   

   while(currChartID>=0)                              // hier laden wir das Template

      {

         if(currChartID!=initChartID)

            {

               if(!ChartApplyTemplate(currChartID, TmplName))

                  MyAlert();  

            }

         currChartID=ChartNext(currChartID);

     }



   currChartID = ChartFirst();                        // reset auf ersten Chart

   while(currChartID>=0)                              // hier werden Periode und Scale eingestellt

      {

         if(currChartID!=initChartID)

            {

               if(ChartPeriod(currChartID)!=initPeriod)

                  ChartSetSymbolPeriod(currChartID,ChartSymbol(currChartID),initPeriod);  



               if(ChartGetInteger(currChartID,CHART_SCALE)!=initScale)

                  ChartSetInteger(currChartID,CHART_SCALE,  initScale);

            }

         currChartID=ChartNext(currChartID);

     }



   PlaySound("ok");                                   // machma a bisserl Lärm

}

Das Tool kommt ins Script-Verzeichnis und kann sehr viel Zeit sparen!

Datei MyAlert.mqh zum Download

Datei MyAlert.mqh zum Download, neuer Versuch.
Geht leider wieder nicht zum hochladen, müsst halt selbst eine MyAlert.mqh anlegen und den Inhalt hineinkopieren. :(