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

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

Как перейти на следующюю строку текстого файла? [D7, XP]


lobach ©   (2006-11-19 18:43:00) 

Вобщем мне надо прочитать текстовый файл в listbox.
Читаю первую строку
var
f:TextFile;
stroka:String;
begin
AssignFile(f, '123.txt');
reset(f);
readln(f, stroka);
ListBox1.Items.Add(stroka);
CloseFile(f);
end;
Там по моему цикл нужен.


palva   (2006-11-19 20:31:00) [1]

Здесь можно воспользоваться методом LoadFromFile:

ListBox1.Items.LoadFromFile('C:\text.txt');


Алхимик   (2006-11-19 18:52:00) [2]

while not eof(f) do begin
 readln(f, stroka);
 ListBox1.Items.Add(stroka);
end;


Наверх

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