MQLArticles/Utils/FA/AutoDelete.mqh

<EFBFBD><EFBFBD>//+------------------------------------------------------------------+

//|                                                   AutoDelete.mqh |

//|                                  Copyright 2025, Niquel Mendoza. |

//|                          https://www.mql5.com/es/users/nique_372 |

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

#property copyright "Copyright 2025, Niquel Mendoza."

#property link      "https://www.mql5.com/es/users/nique_372"

#property strict





#ifndef MQLARTICLES_UTILS_FA_AUTODELETE_MQH

#define MQLARTICLES_UTILS_FA_AUTODELETE_MQH



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

//|                                                                  |

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

typedef void(*FinalCleanFunction)(const int& reason);

#define MQLARTICLES_AUTOCLEANER_FLAG_PTR      (1)

#define MQLARTICLES_AUTOCLEANER_FLAG_FUNCTION (2)

#define MQLARTICLES_AUTOCLEANER_ALL (MQLARTICLES_AUTOCLEANER_FLAG_PTR|MQLARTICLES_AUTOCLEANER_FLAG_FUNCTION)



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

//|                                                                  |

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

class CAutoCleaner

 {

private:

  static void*              s_ptrs[];

  static int                s_ptrs_size;

  static FinalCleanFunction s_c_functions[];

  static int                s_c_functions_size;



public:

  //--- Inicializar

  static void               Init()

   {

    s_ptrs_size = ArrayResize(s_ptrs, 0);

    s_c_functions_size = ArrayResize(s_c_functions, 0);

   }



  //--- Punteros

  // A<EFBFBD>adir

  static void               AddPtr(void* ptr)

   {

    if(CheckPointer(ptr) == POINTER_DYNAMIC)

     {

      s_ptrs[ArrayResize(s_ptrs, ++s_ptrs_size) - 1] = ptr;

     }

   }



  // Remover

  static void               RemovePtr(void* ptr)

   {

    for(int i = 0; i < s_ptrs_size; i++)

     {