Removed unused variable in EncryptString

DCPcrypt2.pas

@@ -629,8 +629,8 @@ begin
 end;
 
 function TDCP_cipher.EncryptString(const Str: RawByteString): RawByteString;
-var
-  lLength : integer;
+//var
+//  lLength : integer;
 begin
 {$IFDEF NEXTGEN}
   Result.SetLength(AnsiLength(Str));