Текстовый файл

[virtuhay266]

Можно ли как-нибудь сразу перейти в начало следующей стоки или нужно перебирать все символы до #13#10?

[Neeter]

просто написать:

Readln(t)

где t - переменная типа TextFile

[mihali4]

Можно определить позицию конца строки функцией POS().
Зачем же так изгаляться - перебором символов?
А еще проще - загрузить в листбокс и скакать по строкам как угодно...

[TriCERATOP]

а как загрузить текстовый файл в листбокс с сохранением строк? например -

Собака
Кошка
Лев

.. ?

[virtuhay266]

while not(eof(f)) do
            begin
              readln(f,s);
              listbox1.Lines.Add(s);
            end;

[mihali4]

Сообщение от TriCERATOP

а как загрузить текстовый файл в листбокс с сохранением строк? например -

Собака
Кошка
Лев

.. ?

Например:

ListBox1.Items.LoadFromFile('111.txt');

[TriCERATOP]

да) все работает, спасибо!
Только еще один вопрос -
в .тхт файлах нет поддержки юникода, а .док файлы ЛистБокс открывает в другой кодировке.
Можно-ли вообще как-то выводить Юникод на ЛистБокс?

[mihali4]

Листбокс хорош именно для текстовых файлов, а доки и ртэфы - ричэдитом...
Дельфи 7 юникод не поддерживает.

[TriCERATOP]

и еще)
почему не работает следующая строка -
if label2.caption='русский' then ListBox1.Items.LoadFromFile('01rus. txt');

[mihali4]

Может, нужно полный путь указать, а не только имя файла?