geht klassisch mit seek und 'ner typsierten datei. ich leg mal 'n beispiel dazu... den rest solltest du aus der hilfe bekommenn..
Delphi-Quellcode:
var
f: file of byte;
i: integer;
c: byte;
begin
assign(f, 'test.txt');
rewrite(f); //datei erstellen
c := byte('i');
for i := 0 to 100 do //was zum test reinschreiben
write(f,c);
//ab hier fängts an
seek(f,30);
c := byte('X');
for i := 0 to 3 do
write(f,c);
close(f);
end.