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

Материал из DRKB

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;


Source: http://delphiworld.narod.ru/
ID: 01056