Меня наверно засмеют за такой вопрос, но все же как посчитать кол-во строк в файле? То есть дан файл, его присваивают переменной f, надо узнать скоко в нем строк. (на самом деле все это нужно чтобы загрузить меню из файла). Заранее спасибо.
Смотря какой файл. Типизированный (file of string например) или текстоый ? Если первое, то FlieSize, если текстовый, то читать все строки из файла и увеличивать при этом счетчик ...
переменная f:text. я так понимаю это второй случай
да.
тогда
while not(EOF(f)) do
begin
readln(f,s);
i:=i+1;
end