Использование таймера в часах - PascalABC.NET

Формулировка задачи:

Вообщем прошу помочь Возможно ли как-то в паскале закинуть таймер к часам ? Т.е. Обычные часы (считывающие все с системного времени) и туда к ним закинуть таймер , который бы отсчитывал определенные промежутки ? Искал подобное задание , в итоге нашел что-то похожее только на вба.

Решение задачи: «Использование таймера в часах»

Листинг программы

uses System;
 
begin
  var d0 := New DateTime(2016, 1, 1);
  var d1 := DateTime.Now.Subtract(d0);
  
  WriteLnFormat('От начала года прошло{0} {1} дней{0} {2} часов{0} {3} минут{0}',
      NewLine, d1.Days, d1.Hours, d1.Minutes);
end.

Объяснение кода листинга программы

Создается новый объект DateTime с начальной датой (2016, 1, 1)
Получается текущее время с помощью метода DateTime.Now
Вычисляется разница между текущим временем и начальной датой с помощью метода Subtract
Выводится результат в формате От начала года прошло [количество] дней [количество] часов [количество] минут с помощью функции WriteLnFormat и строки формата, включающей переменные d1.Days, d1.Hours и d1.Minutes.
Код не содержит обработки ошибок и завершается корректно.