Cronômetro
Preciso fazer o seguinte: Ao clicar em um botão se inicie a contagem de um cronômetro. Como posso fazer isso?
Mc
Curtidas 0
Respostas
Okama
24/03/2003
Coloque um StaticText e um TTimer e ative ele ao clicar no botão:
no Botão:
Var HoraINI: TTime;
begin
HoraINI := Time;
Timer1.Enabled := True;
no OnTimer:
StaticText1.Caption := FormatDateTime(´HH:MM:SS:ZZZ´,Now-HoraINI);
no Botão:
Var HoraINI: TTime;
begin
HoraINI := Time;
Timer1.Enabled := True;
no OnTimer:
StaticText1.Caption := FormatDateTime(´HH:MM:SS:ZZZ´,Now-HoraINI);
GOSTEI 0
Mc
24/03/2003
Deu certo mas ele já começa rodando ao executar o programa, quero que apareça só 00:00:00, e ao clicar no botão ele inicie a cronometrar...
GOSTEI 0
Paullsoftware
24/03/2003
Deu certo mas ele já começa rodando ao executar o programa, quero que apareça só 00:00:00, e ao clicar no botão ele inicie a cronometrar...
complementando...
HoraINI := StrToTime(´00:00:00´);
ou então
HoraINI := SuaVariavelDeTempo;
GOSTEI 0