Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

Кол-во строк в текстовом файле 


VictorT   (2002-03-27 14:01) [0]

Есть ли какая небудь стандартная функция для определения сабжа? Или просто последовательно читать файл и считать в нём кол-во переводов строк?



Alx2   (2002-03-27 14:09) [1]

Скорее всего, читать и считать



kull   (2002-03-27 14:14) [2]

var
SL: TStringList;

....................
SL.LoadFormFile("file.txt");
........................

SL.Count - это кол-во строк.



Alx2   (2002-03-27 15:05) [3]

>kull © (27.03.02 14:14)
ага... а если в файле 1Gb?
Тогда весь гигабайт грузим в память, чтобы посмотреть сколько же там строчек



VictorT   (2002-03-27 15:40) [4]

Cпасибочки, попробую.



Anatoly Podgoretsky   (2002-03-27 21:06) [5]

Считать переводы строк не нужно, лишняя работа, есть псевдо прощедуры ReadLn, вот количество вызовов ее и надо считать.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.018 c
6-22774           f0rm                  2002-01-25 11:56  2002.04.08  
Скопировать файл из локалки


7-22867           МИФИст                2002-01-10 22:16  2002.04.08  
Кнопки и как с ними бороться...


4-22881           AlexanderS            2002-01-22 15:45  2002.04.08  
Как получить selected text


7-22859           Filat                 2002-01-09 13:08  2002.04.08  
Как переделать или что добавить в прогу, чтобы она работала на 2000 проф. и не требовала ntdll.dll, исходники есть.


3-22585           Dust_                 2002-03-18 00:25  2002.04.08  
Сумма по подгруппе в отчете QReport