![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
работать с Tmemo как с тесктовывм файлом [D7, WinXP]
heady © (2005-08-28 21:23:00)Думаю задам примитивный вопрос: умею перебирать все строки в текстовом файле:
var
F:textfile;
s:string;
begin
assignFile(F,'c:test.txt');
reset(F);
while not eof(F) do
begin
readln(F,s);
юююработа с s
end;
не подскажите как перебирать все подряд строки в Memo? Зарание благодарен.
heady (2005-08-28 21:30:00) [1]Спасибо вам! оно!
Profi (2005-08-28 21:27:00) [2]heady (28.08.05 21:23)
У Memo кто-то отменил свойство Lines?
for i:=0 to Memo1.Lines.Count-1 do
s:=Memo1.lines[i];
begin...end (2005-08-28 21:25:00) [3]TMemo.Lines[...]