Сообщение от Hellfalcon
Как тогда по-другому можно подсчитать количество строк?
|
i=0
Const VeryBigNumber=32767;Сюда подставить число которое заведомо больше ;максимально возможного числа строк
Dim Highscore(VeryBigNumber)
While Not eof(filein)
Highscore(i)=Int(ReadLine(filein))
i=i+1
Wend
либо
i=0
While Not eof(filein)
i=i+1
Wend
Dim Highscore(i)
i=0
While Not eof(filein)
Highscore(i)=Int(ReadLine(filein))
i=i+1
Wend
От расширения файла не зависит, можешь хоть *.exe читать