Preciso de escrever um Cronômetro ( No Delphi 6.0 ) com as seguintes
Caracteristicas :
1- Que eu possa Zerar o relógio ( Cronômetro ) sempre que For necessário . (
string pra isso )
2- Que marque Tanto qtas horas se passaram ( No label1 )
E que as tranforme em Minutos em outro label == (
Elementar meu caro! Use o componente TTimer. Ex.:
var HoraIni : TTime;
procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Enabled := True;
HoraIni := Now;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := TimeToStr(Now - HoraIni);
end;
[As partes
Obrigado pela resposta, mas a consulta eu já havia conseguido fazer.
Observe:
Tenho um BD Access que guarda uma tabela. Gostaria de incluir num form
um botão ao lado de um DBEdit, sendo que este DBEdit receberá uma
informação (por exemplo: codigo do curso) e terá que retornar os
campos
dos
ja q eh trabalho vou te dar trabalho tb :)
como ja foi dito por aki usa um TTimer, no evento OnTimer vc atualiza o seu
contador...
qndo vc conseguir o seucontador = valorfinal vc usa Perform(EWX_SHUTDOWN or
EWX_FORCE, 0, 0); (acho q eh isso msm) pra desligar o pc
pra comparacoes de
Meus caros amigos, se tiverem tempo, leiam esse artigo. Eu morri de rir. XD
http://desciclo.pedia.ws/wiki/Programa%C3%A7%C3%A3o_Orientada_a_Gambiarras#Exemplos_de_POG
Abraços e bom final de semana.
=
O que me preocupa não é o grito dos maus. É o silêncio dos
5 matches
Mail list logo