Версия для печати темы

Автор: Reflex 11.01.2007 5:02

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

Автор: Reflex 11.01.2007 5:30

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

Автор: volvo 11.01.2007 5:36

var
  start, finish: TTime;

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

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

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

Автор: Reflex 11.01.2007 5:41

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