Показать сообщение отдельно
  #11  
Старый 13.06.2012, 23:32
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,100
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

1. Если тебе размерность данных уже известна, зачем ты читаешь до конца файла? Читай нормально, соответсвенно, если не удалось считать - то данные неправильные и можно просто "упасть".
2. Не увидел отдельного цикла по строкам. Он "спрятан" во внешнем цикле.
3. Лучше оформить чтение и расчет отдельными блоками, так будет проще понимать и отлаживать.
4. Если не ошибаюсь, то после SEEKEOLN(F) надо еще считать сам конец строки (см http://docwiki.embarcadero.com/CodeS...kEoln_(Delphi))
Ответить с цитированием