Советы по Delphi

         

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;

[000468]



Содержание раздела