Показать сообщение отдельно
  #4  
Старый 31.03.2009, 18:48
Nyctos Kasignete Nyctos Kasignete вне форума
Активный
 
Регистрация: 29.03.2009
Сообщения: 300
Репутация: 94
По умолчанию

rasamaha, начнем с простого... =))
Записать текстовый файл из Memo можно единственной строчкой кода:
Код:
Memo1.Lines.SaveToFile('C:\Directory\File.txt');
Загружать в Memo так:
Код:
Memo1.Lines.LoadFromFile('C:\Directory\File.txt');

Проблема-то не в этом. Вам придется вытаскивать значения из ячеек StringGrid'а. Это уже менее приятно. Вот такая процедурка заполняет Memo значениями из ячеек StringGrid'а:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  i, LastRow: Integer;
begin
  LastRow := StringGrid1.RowCount - 1;
  for i := 0 to LastRow do
    Memo1.Lines.Add(StringGrid1.Rows[i].CommaText);
end;
С записью из Memo в StringGrid тоже подумаю, если хотите.
Ответить с цитированием