![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Time [D7, WinXP]
Earth © (2005-06-12 17:33:00)Как узнать время работы программы и вывести его в Label?
Antonn (2005-06-12 17:46:00) [1]var _dt:Tdatetime;
procedure TForm1.FormCreate(Sender: TObject);
begin
_dt:=now;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption:= formatdatetime('hh:nn:ss', now-_dt);
end;
Earth (2005-06-12 17:45:00) [2]Это я знаю, что нужно отнимать.
А пример кода есть?
Antonn (2005-06-12 17:41:00) [3]время работы программы начинается со старта, и заканчивается ее закрытием.
Может нужно узнать время, пройденное со времени старта?
Earth (2005-06-12 17:39:00) [4]В моей программе, нужно измерить время работы моей программы.
Antonn (2005-06-12 17:38:00) [5]простите, а label в какой программе? И какую программу нужно "отмерять"?