put "{$MODE ...}" directive in each source file; removed trailing spaces, and convert...

[d2df-sdl.git] / src / shared / BinEditor.pas

diff --git a/src/shared/BinEditor.pas b/src/shared/BinEditor.pas
index f59d4f3a5f2fb3c64fe748aecb963e133bf64441..50867f41ff60e4664e4c664a326b65977b3b9c99 100644 (file)
--- a/src/shared/BinEditor.pas
+++ b/src/shared/BinEditor.pas
@@ -1,3 +1,4 @@
+{$MODE DELPHI}
 Unit BinEditor;
 
 Interface
@@ -118,7 +119,7 @@ procedure ZeroMemory(Dest: Pointer; Len: Cardinal);
 begin
   FillChar(Dest^, Len, 0);
 end;
-  
+
 { T B i n M e m o r y W r i t e r : }
 
 Constructor TBinMemoryWriter.Create(aSize: Cardinal);
@@ -141,7 +142,7 @@ begin
     FreeMem(FData);
     FData := nil;
   end;
-  
+
   Inherited;
 end;
 
@@ -405,7 +406,7 @@ begin
       CopyMemory(@len,
                  Pointer(Cardinal(FData) + FPosition),
                  SizeOf(Byte));
-         
+
       if (FPosition + SizeOf(Byte) + len) <= FSize then
         begin
           FPosition := FPosition + SizeOf(Byte);