use SetString in LoadFromSteam

Alexey-T · Oct 22, 2020 · 152e34b · 152e34b
1 parent 13af814
commit 152e34b
Showing 1 changed file with 2 additions and 8 deletions.
diff --git a/atsynedit/atstrings_load.inc b/atsynedit/atstrings_load.inc
@@ -430,20 +430,14 @@ begin
         case FEncoding of
           cEncAnsi:
             begin
-              SA:= '';
-              SetLength(SA, Len);
-              Move(Buf[NStart], SA[1], Len);
-
+              SetString(SA, @Buf[NStart], Len);
               SUtf8:= EncConvertToUTF8(SA, FEncodingCodepage);
-
               LineAddRaw_NoUndo(SUtf8, LineEnd);
             end;
 
           cEncUTF8:
             begin
-              SA:= '';
-              SetLength(SA, Len);
-              Move(Buf[NStart], SA[1], Len);
+              SetString(SA, @Buf[NStart], Len);
               LineAddRaw_NoUndo(SA, LineEnd);
             end;