Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запишем содержимое Memo в INI файл полнотью... [D3, Win95/98]


I love Warez ©   (2002-05-31 17:09:00) 

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


VID   (2002-05-31 23:20:00) [1]

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


yaJohn   (2002-05-31 20:43:00) [2]

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


yaJohn   (2002-05-31 20:42:00) [3]

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


I love Warez   (2002-05-31 20:14:00) [4]

2VID © (31.05.02 19:54

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


VID   (2002-05-31 19:54:00) [5]

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;


Виктор Щербаков   (2002-05-31 17:23:00) [6]

LoadFromFile


I love Warez   (2002-05-31 17:16:00) [7]

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


Виктор Щербаков   (2002-05-31 17:11:00) [8]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо