delphi количество строк в файле



Автор Ўрий Байтемиров задал вопрос в разделе Другие языки и технологии

написать программу и подсчитать количество строк в текстовом файле! Делфи!! и получил лучший ответ

Ответ от Veon[гуру]
1) Считать строки в массив и посчитать кол-во элементов.
2) При построчном считывании поставить счетчик строк

Ответ от Александр Ильин[гуру]
{$apptype console}
uses Windows, SysUtils, Classes;
var
s: String;
begin
Write('Имя файла: '); ReadLn(s);
if not FileExists(s) then begin
WriteLn('Файл не существует! ');
Exit;
end;
with TStringList.Create do
try
LoadFromFile(s);
WriteLn('Число строк в файле ', s, ' = ', Count);
finally
Free;
end;
end.

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: написать программу и подсчитать количество строк в текстовом файле! Делфи!!

Чем опасен вирус win32:neshta?
Вредоносная программа, которая находит и заражает исполняемые файлы. Программа является приложением
подробнее...

что делает виру нешта ?
Neshta.a
Технические детали

Вредоносная программа, которая находит и заражает
подробнее...

Как изменит системную переменную Path с помощью delphi?
Для этого используется API функция GetEnvironmentVariable.

GetEnvironmentVariable
подробнее...

Как закончить программу на delphi? Пишет unexpected end of file
53. Unexpected end of file in comment started on line <n>. Неожиданный конец файла при
подробнее...
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*