Тема: Timer
Показать сообщение отдельно
  #7  
Старый 24.01.2012, 02:05
Аватар для angvelem
angvelem angvelem вне форума
.
  
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию
При запуске получаешь текущее время:
Код:
var
  Time : TDateTime;
begin
   Time := Now;
по завершению:
Код:
  Now - Time;
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием