Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.15;
Скачать: CL | DM;

Вниз

Как прочитать строку???   Найти похожие ветки 

 
lobach ©   (2007-03-26 15:34) [0]

Как прочитать n-ую строку из текст. файла??


 
Рамиль ©   (2007-03-26 15:35) [1]

for i := 1 to n-1 do readln(f);
readln(f, Sn);


 
Сорокин М   (2007-03-26 15:38) [2]

strings[n]


 
Anatoly Podgoretsky ©   (2007-03-27 00:06) [3]

> Рамиль  (26.03.2007 15:35:01)  [1]

Совсем ни к чему делать два readln


 
McSimm ©   (2007-03-27 00:09) [4]


> for i := 1 to n-1 do

я бы все же посоветовал while not eof и счетчик.
Мне попадались файлы, в которых строк намного меньше чем n


 
DrPass ©   (2007-03-27 00:11) [5]


> Мне попадались файлы, в которых строк намного меньше чем
> n

Достаточно сделать n:= 1 в начале программы, и проблема сама собой исчерпывается.


 
RASkov   (2007-03-27 00:38) [6]

> while not eof и счетчик. Мне попадались файлы, в которых строк намного меньше чем n

но можно и так :)
for i := 1 to n do if Eof(f) then Break else readln(f, Sn);

> [5] DrPass ©   (27.03.07 00:11)

Не уловил смысл :(


 
Плохиш ©   (2007-03-27 00:40) [7]


> но можно и так :)
> for i := 1 to n do if Eof(f) then Break else readln(f, Sn);

Нафига тратить время на пересылку из буфера в переменную ненужных строк?


 
RASkov   (2007-03-27 00:54) [8]

> [7] Плохиш ©   (27.03.07 00:40)

Да это я что-то не соображу, что конкретно имел ввиду [3] Anatoly Podgoretsky ... :(
А вобще согласен, и поэтому "улыбнулся" перед кодом.



Страницы: 1 вся ветка

Текущий архив: 2007.04.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
2-1175016208
Express
2007-03-27 21:23
2007.04.15
Вопрос по WMI?


2-1174637885
Konst5719
2007-03-23 11:18
2007.04.15
DeleteString


1-1171994788
Andrey.Ru
2007-02-20 21:06
2007.04.15
Как получить первые 4 бита из байта...


2-1174913131
Карман
2007-03-26 16:45
2007.04.15
как запустить файл?


2-1174552885
sergeyst
2007-03-22 11:41
2007.04.15
TRegistry