[!nferno]

У меня вот так заменяет без проблем :-7
seek(f1,rec_num);
s.pole:='New Value';
s.iii:=9999;
write(f1,s);
closefile(f1);