Опять про файл

← →
Новенький (2003-06-28 17:45) [0]

Подскажите такую вещь: Пользователь вводит номер строки и прога читает строку с этим номером из файла
т.е. If n=8 Then читать 8-ю строку.
Файл текстовый.

← →
Anatoly Podgoretsky © (2003-06-28 17:51) [1]

А вопрос?

← →
Новенький (2003-06-28 22:13) [2]

А вопрос как это осуществить. :)

← →
Anatoly Podgoretsky © (2003-06-28 22:23) [3]

Чмтать файл с первой строки и до нужной или целиком и там брать строку. За прошедщую неделю эту тему несколько раз поднимали, может посмотришь сам?
К конце концов ты вопрос по сути так и не поставил, это состоит из многих частей, ты какую не умеешь делать? Не поверю, что совсем все не понятно, так быть не может.

procedure TForm1.Button1Click(Sender: TObject); begin assignfile(f, "d:\1.txt"); reset(f); repeat n:=n+1; readln(f, tmp); until n=strtoint(Edit1.Text); //то число, которое ты ввел closefile(f); caption:=tmp; end;

Опять про файл Найти похожие ветки