[AND_REY]

Попробовал записует и читает норм. Да только количество елементов массива нужно тоже сохранять. Хотя согласен с вышесказанным что
лучше использовать TStringList.

Код:

procedure TForm1.Button2Click(Sender: TObject);
Var
  Q: Array of String[32];
  F: TFileStream;
  i, R: Integer;
begin
 R:= 2;
 SetLength(Q, R);
 F:= TFileStream.Create('C:\1.txt',fmOpenRead);
 For i:= 0 To R - 1 Do
  begin
   F.Read(Q[i], SizeOf(Q[i]));
   ListBox1.Items.Add(Q[i]);
  end;
 F.Free;
end;