Если кому интересно, привожу свой окончательный вариант
(Напомню, задача была поставлена следующая: отобразить время с момента включения таймера1 и динамически выводить его на лейбл1.
Было реализованно следующим образом: добавляем таймер2 с interval = 1000 (1 сек), включаем этот таймер вместе с таймером1 и пишем ему в событие OnTimer:
Код:
procedure TMainForm.Timer2Timer(Sender: TObject);
var
ResultTime: TDateTime;
begin
ResultTime := Now - StartTime;
TimerLabel.Caption := IntToStr(HoursBetween(StartTime, Now)) + ':' + FormatDateTime('nn:ss', ResultTime);
end;
где StartTime - переменная типа TDateTime, которую мы определяем при включении таймера1, как StartTime := Now;
PS: В очередной раз, низкий поклон помогавшим!
