| 166 |  | ffile.Opened := True; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 167 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 168 |  | //******************************************************************* | 
 
 
 
 
 
 
 
 
 
 
 | 169 | < | fs := TFileStream.Create('C:\Spiele\Oni\GameDataFolder\tests\'+IntToStr(ffile.FileInfo.ID)+'_recreated.hex', fmCreate); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 170 | < | ffile.ReCreateFile(fs); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 171 | < | fs.Free; | 
 
 
 
 
 
 
 
 
 | 169 | > | //    fs := TFileStream.Create('C:\Spiele\Oni\GameDataFolder\tests\'+IntToStr(ffile.FileInfo.ID)+'_recreated.hex', fmCreate); | 
 
 
 
 
 | 170 | > | //    ffile.ReCreateFile(fs); | 
 
 
 
 
 | 171 | > | //    fs.Free; | 
 
 
 
 
 
 
 
 
 
 
 | 172 |  | //******************************************************************* | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 173 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 174 |  | end; |