Ersten Bytes einer File verändern

[Muetze1]

Warum zeigt ihm niemand den Fehler in seinem Code?

Sein Ansatz würde genauso funktionieren, wenn er dereferenziert:

Delphi-Quellcode:

AssignFile(F, FileName);
  Reset(F, 1);
  // Seek(F, 0); // unnötig, dort steht man nach dem Öffnen...

  s := PChar(Header);
  BlockWrite(F, s^, Length(Header));
  CloseFile(F);

Und ohne PChar Cast gehts auch:

Delphi-Quellcode:

AssignFile(F, FileName);
  Reset(F, 1);
  // Seek(F, 0); // unnötig, dort steht man nach dem Öffnen...

  BlockWrite(F, Header[1], Length(Header));
  CloseFile(F);