Vielen Dank euch allen, insbesondere an kolbaschedder. Seine Lösung passt per Copy Paste
Ich habe es zuerst als TFilestream versucht, aber es hat nicht geklappt. Habe ich hier am Code irgendwas falsch gemacht?
Delphi-Quellcode:
var
FS: TFilestream;
aFileName: String;
aPosition: Longint;
aValue: Byte;
begin
aFileName := 'datei.dbf';
aPosition := $1C;
aValue := 0;
with FS.Create(AFileName, fmOpenWrite) do //öffnen
try
Position := APosition; //Position "suchen"
Write(AValue, sizeof(AValue)); //Schreiben
finally
Free; //schließen
end;