| 202 |  | Stream_Names := TMemoryStream.Create; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 203 |  | Stream_Dat   := TFileStream.Create(Target, fmCreate); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 204 |  | Stream_Raw   := TFileStream.Create(AnsiReplaceStr(Target, '.dat', '.raw'), fmCreate); | 
 
 
 
 
 
 
 
 | 205 | + | Stream_Raw.Write(EmptyBytes[0], 32); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 206 |  | if Connection.DataOS in [DOS_WINDEMO, DOS_MAC, DOS_MACBETA] then | 
 
 
 
 
 
 
 
 | 207 | + | begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 208 |  | Stream_Sep := TFileStream.Create(AnsiReplaceStr(Target, '.dat', '.sep'), fmCreate); | 
 
 
 
 
 
 
 
 | 209 | + | Stream_Sep.Write(EmptyBytes[0], 32); | 
 
 
 
 
 
 
 
 | 210 | + | end; | 
 
 
 
 
 
 
 
 | 211 | + |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 212 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 213 |  | DoStep('Creating header'); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 214 |  | progress.Position      := 0; |