Статьи по Delphi (017)…

TStringGrid и файловый поток.

- Хотел бы я на "винте" столько места, чтобы на него влез двухсот гигабайтный своп-файл! - Зачем тебе такой большой своп?!! - Да не нужен мне такой своп! Просто хотелось бы столько места!..
Какое наилучшее решение для сохранения экземпляра TStringGrid (150x10)?

Если вы хотите сохранить это на диске:

var:
  myStream: TFileStream;
begin
  myStream1 := TFileStream.Create('grid1.sav', fmCreate);
  myStream1.WriteComponent(StringGrid1);
  myStream1.Destroy;
end;

Для обратного чтения:

myStream    := TFileStream.Create('grid1.sav', fmOpenRead);
StringGrid1 := myStream1.ReadComponent(StringGrid1) as TStringGrid;