瀏覽代碼

Amiga: fix fp.dsk saving

git-svn-id: trunk@35399 -
marcus 8 年之前
父節點
當前提交
8e123e7b37
共有 1 個文件被更改,包括 3 次插入0 次删除
  1. 3 0
      ide/wresourc.pas

+ 3 - 0
ide/wresourc.pas

@@ -780,6 +780,9 @@ begin
       Fail;
     End;
   MyStream:=true;
+  {$ifdef HASAMIGA}
+  Flush;
+  {$endif}
 end;
 
 constructor TResourceFile.LoadFile(AFileName: string);