![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#4
|
|||
|
|||
![]() Используй TListBox
У него есть функция LoadFromFile(const FileName: string) Она считыват весь файл и выводит его построчно в ListBox, в этом случае он считает и выведет в TListBox весь файл! Код:
ListBox1.Items.LoadFromFile('C:\1.txt'); Или же если нужно отсортировать содержимое по каким то критериям, то можно использовать вот этот код: Код:
Var F: TextFile; s: String; Begin AssignFile(f,'C:\1.txt'); Reset(f); //Запускаем цикл, который будет считывать файл построчно, пока недостигнет конца файла While not eof(F) do Begin ReadLn(f,s); //Например отсеим строки, которые больше 20 символов If Length(s)>=20 then ListBox1.Items.Add(s); End; CloseFile(f); End; Я бы изменил мир, но бог исходников не дает! Последний раз редактировалось Жендос, 11.06.2008 в 00:18. |