Nie kumach rekordów

0

Ok mam pytanie dotyczące rekordów. Deklaruje rekord , w nim tablice, i ze dwa integer i wpisuje do niego dane.Potem próbuje zapisać to do pliku ale program nie chce mi tego zapisac. Juz zacząłem żywcem przepisuwać z ksiażki o delphi ale nie tworzy mi tego pliku. mój kod wydląda tak.

<font color="green">unit Unit1;

type
Trecord=record
a:array[1..2]of string;
end;

var
Form1: TForm1;
F: file of Trecord;
{tu wyskakuje błąd [Error] Unit1.pas(93):Type 'Trecord' needs finalization - not allowed in file type}
rec:TRecord;

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.caption:=Form1.caption+' '+ Label31.caption;
rec.a[1]:='2';
rec.a[2]:='3';
AssignFile(F, 'c:\dane.dat');
try
Rewrite(F);
Write(f, Rec);
finally
CloseFile(F);
end;
end;

Co w tym kodzie jest nie tak? Proszę o pomoc, bo on raz działa a raz nie już mnie szlak trafia


0

Rekord zapisywany do pliku musi mieć określoną stałą dlugosc w bajtach. Dla przykładu: string[20]

Twój rekord mozesz takze zapisac uzywajac strumieni.

0
type
    Trecord=record
    a:array[1..2]of string;
    end;

Musisz podac długość String, np. String[20], inaczej zapisywanie do pliku typowanego nie przejdzie.

1 użytkowników online, w tym zalogowanych: 0, gości: 1