Delphi - zapisywanie do pliku

[Pjetal]

Jak zaimplementować w Delphi najprostsze zapisywanie struktury do pliku ??? Na przykład tablicy rekordów ??

[K3310pH]

A przykladowo tak:

 

[php:1:26ce8894d1]

type rekord = record

a: integer;

b: integer;

end;

 

var

F: File;

rekordy: array[0..10] of rekord;

i: integer;

begin

 

for i:=0 to 10 do

begin

rekordy.a := 10 - i;

rekordy.b := i;

end;

 

AssignFile(F, 'plik.dat');

Rewrite(F, sizeof(rekord));

 

BlockWrite(F, rekordy, 11); { 11 - ilosc rekordow ( 0 - 10 ) }

 

CloseFile(F);

 

[/php:1:26ce8894d1]