47 lines
2 KiB
MQL5
47 lines
2 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| GlobalsDelete.mq5 |
|
|
//| Copyright 2021, MetaQuotes Ltd. |
|
|
//| https://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
#include "..\..\Include\PRTF.mqh"
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Script program start function |
|
|
//+------------------------------------------------------------------+
|
|
void OnStart()
|
|
{
|
|
// try to delete nonexistent variable
|
|
PRTF(GlobalVariableDel("#123%"));
|
|
// try to delete a group of nonexistent variables
|
|
PRTF(GlobalVariablesDeleteAll("#123%"));
|
|
|
|
// the time limit is in long past,
|
|
// so no variables with such time should exist, and no one be deleted
|
|
PRTF(GlobalVariablesDeleteAll(NULL, D'2021.01.01'));
|
|
|
|
const string abracadabra = "abracadabra";
|
|
// make sure this variable exists (just for the test)
|
|
PRTF(GlobalVariableSet(abracadabra, 0));
|
|
// now delete it
|
|
PRTF(GlobalVariableDel(abracadabra));
|
|
|
|
// now try to delete variables from previous test scripts:
|
|
// GlobalsRunCount.mq5 and GlobalsRunCheck.mq5
|
|
// this should remove 2 variables if the tests have been run before,
|
|
// because their variables starts from the given prefix
|
|
PRTF(GlobalVariablesDeleteAll("GlobalsRun"));
|
|
PRTF(GlobalVariablesTotal());
|
|
/*
|
|
example output
|
|
|
|
GlobalVariableDel(#123%)=false / GLOBALVARIABLE_NOT_FOUND(4501)
|
|
GlobalVariablesDeleteAll(#123%)=0 / ok
|
|
GlobalVariablesDeleteAll(NULL,D'2021.01.01')=0 / ok
|
|
GlobalVariableSet(abracadabra,0)=2021.08.30 14:02:32 / ok
|
|
GlobalVariableDel(abracadabra)=true / ok
|
|
GlobalVariablesDeleteAll(GlobalsRun)=2 / ok
|
|
GlobalVariablesTotal()=0 / ok
|
|
|
|
*/
|
|
}
|
|
//+------------------------------------------------------------------+
|