Ich habe eine ZIP archiv das fängt ja mit PK an
das würde ich gerne löschen und später wieder ersetzen!
Delphi-Quellcode:
AssignFile(F, FileName);
Reset(F, 1);
Seek(F, 0); // 0 zum Anfang der Datei
s := PChar(Header);
BlockWrite(F, S, Length(Header));
CloseFile(F);
sowas macht nur Müll mit der datei ... hat jemand eine Bessere Lösung?