Цитата:
delphi 7(прога работала норм...
...поставил 2012 XE3 и программа стала выдавать не правильное...
|
И в Дельфи 7 программа не могла работать правмльно
Код:
...
Hours := TheLength div 3600000;
...
TheLength - локальная переменная и без инициализации в ней находится "мусор". И этот "мусор" вы делите, получая в результате такой же "мусор".