Wenn ich das richtig im Kopf habe, dann liest
TFileStream
die Datei nie* komplett ein (es arbeitet mit
WriteFile
und
ReadFile
, welche das selbst nicht machen, zumindest wenn du keinen entsprechend großen Puffer übergibst
). Dann könntest du mit
TStream.Write
die ersten paar Byte ersetzen.
* ganz kleine Dateien eventuell ausgenommen
Gruß,
Sven