Complete BigTask

port-source/kam_remake/src/utils/io/KM_FileIO.pas

@@ -66,6 +66,7 @@ implementation
 uses
   StrUtils, KM_CommonUtils,
   KM_Defaults
+  {$IFDEF FPC}, KaMResourceInput{$ENDIF}
   {$IFDEF ANDROID}, KM_FileIO_Mobile{$ENDIF};
 
 
@@ -114,7 +115,7 @@ var
     DefaultEncoding: TEncoding;
   {$ENDIF}
   {$IFDEF FPC}
-    MS: TMemoryStream;
+    MS: TStream;
     BOM: array[0..2] of Byte;
     HasBOM: Boolean;
     TmpA: RawByteString;
@@ -135,9 +136,8 @@ begin
     end;
   {$ENDIF}
   {$IFDEF FPC}
-    MS := TMemoryStream.Create;
+    MS := KaMOpenResourceStream(aFilename);
     try
-      MS.LoadFromFile(aFileName);
       HasBOM := False;
       if MS.Size >= 3 then
       begin