[Tadeus]

Сообщение от Hellfalcon

выдает три раза ошибку Memory acces violation на
DimLen=Int(ReadString(filein))
У меня файл *.txt . Может из-за этого ?
Как тогда по-другому можно подсчитать количество строк?

А файл-то у тебя с правильным именем?