【MQL5】FileDelete関数について

bool FileDelete(
  const string file_name,    // 削除するファイルの名称
  int          common_flag=0 // 削除するファイルの場所
);

//--- スクリプトの起動時に入力パラメータのウィンドウを表示する
#property script_show_inputs
//--- 古いファイルの日付
input datetime InpFilesDate = D'2013.01.01 00:00';

//+------------------------------------------------------------------+
//| スクリプトプログラムを開始する関数                                          |
//+------------------------------------------------------------------+
void OnStart()
{
    // ファイル名を格納する変数
    string file_name;
    // ファイル検索フィルタ
    string filter = "*.txt";
    // ファイル作成日
    datetime create_date;
    // ファイル名のリスト
    string files[];
    // デフォルトの配列サイズ
    int def_size = 25;
    // ファイル数
    int size = 0;
    
    //--- 配列へのメモリ追加
    ArrayResize(files, def_size);
    
    //--- ローカルフォルダのルートで検索ハンドルを受け取る
    long search_handle = FileFindFirst(filter, file_name);
    
    //--- FileFindFirst() の実行が成功したかをチェックする
    if (search_handle != INVALID_HANDLE)
    {
        //--- ループでファイルを検索する
        do
        {
            // ファイル名を配列に格納する
            files[size] = file_name;
            //--- 配列サイズを増やす
            size++;
            if (size == def_size)
            {
                // 配列サイズを25増やす
                def_size += 25;
                ArrayResize(files, def_size);
            }
            //--- エラー値をリセットする
            ResetLastError();
            //--- 作成日を受け取る
            create_date = (datetime)FileGetInteger(file_name, FILE_CREATE_DATE, false);
            //--- ファイルが古いかをチェックする
            if (create_date < InpFilesDate)
            {
                // ファイルが古い場合は削除する
                PrintFormat("%s file deleted!", file_name);
                //--- 古いファイルを削除する
                FileDelete(file_name);
            }
        } while (FileFindNext(search_handle, file_name));
        
        //--- 検索ハンドルを閉じる
        FileFindClose(search_handle);
    }
    else
    {
        // ファイルが見つからなかった場合の処理
        Print("Files not found!");
        return;
    }
    
    //--- 何のファイルが残っているかをチェックする
    PrintFormat("Results:");
    // ファイルの存在をチェックするループ
    for (int i = 0; i < size; i++)
    {
        // ファイルが存在するかを確認する
        if (FileIsExist(files[i]))
            PrintFormat("%s file exists!", files[i]);
        else
            PrintFormat("%s file deleted!", files[i]);
    }
}
```

//--- スクリプトの起動時に入力パラメータのウィンドウを表示する
#property script_show_inputs
//--- 古いファイルの日付
input datetime InpFilesDate=D'2013.01.01 00:00';

//+------------------------------------------------------------------+
//| スクリプトプログラムを開始する関数                                          |
//+------------------------------------------------------------------+
void OnStart()
{
  string file_name;       // ファイル名を格納する変数
  string filter = "*.txt"; // ファイル検索フィルタ
  datetime create_date;   // ファイル作成日
  string files[];         // ファイル名のリスト
  int def_size = 25;      // デフォルトの配列サイズ
  int size = 0;           // ファイル数

//--- 配列へのメモリ追加
ArrayResize(files, def_size);
//--- ローカルフォルダのルートで検索ハンドルを受け取る
long search_handle = FileFindFirst(filter, file_name);

//--- FileFindFirst() の実行が成功したかをチェックする
if (search_handle != INVALID_HANDLE)
{
    //--- ループでファイルを検索する
    do
    {
        files[size] = file_name;
        //--- 配列サイズを増やす
        size++;
        if (size == def_size)
        {
            def_size += 25;
            ArrayResize(files, def_size);
        }
        //--- エラー値をリセットする
        ResetLastError();
        //--- 作成日を受け取る
        create_date = (datetime)FileGetInteger(file_name, FILE_CREATE_DATE, false);
        //--- ファイルが古いかをチェックする
        if (create_date < InpFilesDate)
        {
            PrintFormat("%s file deleted!", file_name);
            //--- 古いファイルを削除する
            FileDelete(file_name);
        }
    } while (FileFindNext(search_handle, file_name));
}

else
{
    Print("Files not found!");
    return;
}
//--- 何のファイルが残っているかをチェックする
PrintFormat("Results:");

for(int i=0; i<size; i++)
{
    if(FileIsExist(files[i]))
        PrintFormat("%s file exists!", files[i]);
    else
        PrintFormat("%s file deleted!", files[i]);
}
}