Ugochukwu Mmaduekwe 7 лет назад
Родитель
Сommit
acc14608b0
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      CryptoLib/src/Utils/ClpStringUtils.pas

+ 1 - 1
CryptoLib/src/Utils/ClpStringUtils.pas

@@ -201,7 +201,7 @@ end;
 class function TStringUtils.BeginsWith(const Input, SubString: string;
   IgnoreCase: Boolean; Offset: Int32): Boolean;
 var
-  L: Integer;
+  L: Int32;
   PtrInput, PtrSubString: PChar;
 begin
   L := System.Length(SubString);