Здравствуйте как мне узнать время работы программы не выходя за пределы модуля Sysutils помогите как можно быстрее спасибо

Вольвочка, неужели ты даже не знаешь как это делать, я видела что ты читал эту тему, пожалуйста, помоги, если можешь или скажи где про это прочитать.

var
  start, finish: TTime;

...
  start := Time(); // Начало работы
...
  // Здесь - что-то ужасно длительное ...
...
  finish := Time(); // Закончили засекать время

  // и показываем, что получилось...
  showmessage('Time = ' + FormatDateTime('hh:mm:ss:mm', (finish - start)));
...

Все функции и типы описаны в SysUtils... Пойдет?

да спасибо большое