Changeset 154


Ignore:
Timestamp:
Apr 1, 2007, 10:36:23 PM (14 years ago)
Author:
alloc
Message:
 
Location:
oup/current
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • oup/current/Helper/LevelDB.pas

    r152 r154  
    203203  Stream_Dat   := TFileStream.Create(Target, fmCreate);
    204204  Stream_Raw   := TFileStream.Create(AnsiReplaceStr(Target, '.dat', '.raw'), fmCreate);
     205  Stream_Raw.Write(EmptyBytes[0], 32);
    205206  if Connection.DataOS in [DOS_WINDEMO, DOS_MAC, DOS_MACBETA] then
     207  begin
    206208    Stream_Sep := TFileStream.Create(AnsiReplaceStr(Target, '.dat', '.sep'), fmCreate);
     209    Stream_Sep.Write(EmptyBytes[0], 32);
     210  end;
     211
    207212
    208213  DoStep('Creating header');
Note: See TracChangeset for help on using the changeset viewer.