Mam coś takiego (w skrócie):
procedure TForm1.Button1Click(Sender: TObject);
var
f: file of TTest;
r: TTest;
begin
r.a:=10;
r.b:='aaa';
assignfile(f,'c:\aaaa.dat');
rewrite(f);
Write(f,r);
closefile(f);
end;
i wywala mi błąd na f: file of TTest; o treści:
Type 'TTest' needs finalization - not allowed in file type.
O co chodzi i co robię źle? to przecież książkowy przykład :|