Задача по программированию - record (Delphi)

[Вельвет]

Есть запись (record) которая описывает стол
Не знаю, правильно или нет? :

Type
table=record
color: string[15];
size: real;
end.

Задача: Дан динамический массив типа как описано выше, нужно сохранить в файл только столы черного цвета

Помогите пожалуйста...

[Dilex]

Описываешь все столы которые у тебя есть потом делаешь отсев черных
для вывода количества, далее записываешь в файл:

procedure TForm1.Button2Click(Sender: TObject);
begin
 memo1.Lines.SaveToFile('с:\название документа.txt');
end;

далее когда все вывел нажал кнопочку сохранить и всё )
только смотри в этом примере сохранение производиться с поля memo1
если у тебя другие поля вывода и т.д допустим lable то код будет выглядеть следующим образом

procedure TForm1.Button2Click(Sender: TObject);
begin
lable.Lines.SaveToFile('с:\название документа.txt');
end;

[Mad_Cat]

у label нет SaveToFile

[Dilex]

Сообщение от Mad_Cat

у label нет SaveToFile

спасибо за поправку !

[ByAlex]

Сообщение от Вельвет

Помогите пожалуйста...

Делай так -

n:=0;
for i:=1 to fileSize(File) do
   if Arr[i].color='black' then
   begin
      write(File, Arr[n]);
      inc(n);
   end;

[Вельвет]

Сообщение от ByAlex

Делай так -

n:=0;
for i:=1 to fileSize(File) do
   if Arr[i].color='black' then
   begin
      write(File, Arr[n]);
      inc(n);
   end;

спасибо большое
можешь еще краткие комментарии написать?