Как обратиться к кокретной строке в файле.

← →
DimaIv (2002-04-02 19:07) [0]

← →
yaJohn © (2002-04-02 19:37) [1]

1. Загрузить его в TStrings.
2. Последовательным чтением с подсчетом кол-ва возвратов каретки. Вариантов реализации - масса.

В TP7 есть
var f:file;
c:char;
i,a:integer;{Куда надо в file}
seek(f,i);{Смещение указателя в файле по заданному i}

Зате можно Типа(TP7)
a:=1;
blockread(f,c,a);{В с копируем 1 символ{смещение seek}}
if c:=возврат коретки then мы на 1-ой(2-ой) строке
Далее снова seek и т.д.

Как обратиться к кокретной строке в файле. Найти похожие ветки