Запишем содержимое Memo в INI файл полнотью...

← →
I love Warez (2002-05-31 17:09) [0]

Как программно в INI файл записать содержимое Memo? Только записать нужно не только первую строку, что и получаеться при записи обычным способом, но и все остальные.

← →
Виктор Щербаков © (2002-05-31 17:11) [1]

Memo1.Lines.SaveToFile("file.ini");

← →
I love Warez (2002-05-31 17:16) [2]

А обратно загрузить текст в Memo?

← →
Виктор Щербаков © (2002-05-31 17:23) [3]

LoadFromFile

← →
VID © (2002-05-31 19:54) [4]

Procedure SaveMemoLinesToIni;
Var INI:TIniFile;
I:Integer;
begin
IF Memo1.lines.count = 0 then exit;
Ini:=TInifile.Create("c:\i.ini");
FOR I:=0 to memo1.lines.count - 1 do
Ini.WriteString("Memo1_lines", "Line_"+Inttostr(I), Memo1.lines.strings[i]);
Ini.free;
end;

← →
I love Warez (2002-05-31 20:14) [5]

2VID © (31.05.02 19:54

Читаеться обычным способом?

Ini.WriteString("Section", "Memo", Memo1.lines.CommaText);

Memo1.lines.CommaText:=Ini.ReadString("Section", "Memo", "");

читается в таком же цикле , только надо заменить:
Ini.WriteString("Memo1_lines", "Line_"+Inttostr(I), Memo1.lines.strings[i]);
на:
Ini.ReadString("Memo1_lines", "Line_"+Inttostr(I), "");

Запишем содержимое Memo в INI файл полнотью... Найти похожие ветки