Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.06.2009, 13:08   #1
Monte-Kristo
Пользователь
 
Регистрация: 03.03.2009
Сообщений: 27
По умолчанию Вычисление времени работы программы

Мне необходимо расчитать время работы программы, для чего пользую всем известный модуль dos, процедуру gettime.
Но встает вопрос, как правильно расчитать время? По сути, надо из финиша вычесть старт, но:
если время старта:
3 ч., 59 мин., 56 с., 98 млс
а время финиша
4 ч, 00 мин, 03 с, 17 млс

то при вычитании получится полная ерунда. Пробовал переводить все в часы и вычитать, но тоже как-то особо не получилось ничего.

если кто знает алгоритм расчета времени для таких случаев, напишите пожалуйста.
Monte-Kristo вне форума Ответить с цитированием
Старый 12.06.2009, 13:14   #2
Sazary
В тени
Старожил
 
Аватар для Sazary
 
Регистрация: 19.12.2008
Сообщений: 5,788
По умолчанию

Отнимаем так, как бы делали на бумаге:
сначала миллисекунды. Если первое значение (финиш) меньше второго (старт), то добавляем к нему 100 и отнимаем 1 от секунд (финиш). Далее находим разность между секундами. Если первое значение меньше второго, то прибавляем 60 и отнимаем 1 от минут. Ну и далее с часами.
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем.

___________________________________ ___________________________________ _______
[=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]
Sazary вне форума Ответить с цитированием
Старый 12.06.2009, 13:25   #3
Monte-Kristo
Пользователь
 
Регистрация: 03.03.2009
Сообщений: 27
По умолчанию

Хм))) Логично))) Спасиб большое))))
Monte-Kristo вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Наглядное анимирование работы программы. Geddar Помощь студентам 9 03.05.2009 06:24
Остановление работы программы. extrimportal Общие вопросы Delphi 11 23.04.2009 12:09
Завершение работы чужой программы Viteef Win Api 12 24.09.2007 12:31
Проверка работы программы... DimkinStd Общие вопросы Delphi 3 26.12.2006 13:24