Version

Пример использования

1. ConsoleWrite($AmiSharp.Version())

   В стандартном выводе появится строка

   1.0.1.3

2. Проверка минимально необходимой версии Amisharp для работы скрипта AutoIt:

   Func VersionCompare($Etalon)
      $Etalon = StringSplit($Etalon,'.',3)
      $Etalon = (($Etalon[0]*1000 + $Etalon[1])*1000 + $Etalon[2])*1000 + $Etalon[3]
   
      Local $Version = StringSplit($Amisharp.Version(),'.',3)
      $Version = (($Version[0]*1000 + $Version[1])*1000 + $Version[2])*1000 + $Version[3]

      Return $Version >= $Etalon
   EndFunc

   if Not VersionCompare("1.0.1.3") Then
      MsgBox(16,$ScriptName,"Необходим AmiSharp V1.0.1.3 или старше")
      Exit
   EndIf

3. dnl Проверка допустимости версии AmiSharp
   dnl Возвращает True или False
   dnl Параметр - строка минимально допустимой версии в формате "1.0.1.3"

   function AmiSharp_Version_StringToNum(Str)
   {  Local Result,i;

      Result = 0;
      Str = StrReplace(Str,".",",");
         for (i = 0 ; i <= 3 ; i++)
            Result = Result * 1000 + StrToNum(StrExtract(Str,i));
         Return Result;
   }

   procedure AmiSharp_Version(MinimalVersion)
   {  Local VarName,Result;

      VarName = "~Version~" + GetChartID();
   
      Result = StaticVarGet(VarName);
      if (IsEmpty(Result))
      { Result = AmiSharp_Version_StringToNum(m4_amisharp.Version()) >= AmiSharp_Version_StringToNum(MinimalVersion);
         StaticVarSet(VarName,Result);
      }
      Return Result;
   }