Ver Mensaje Individual
  #8  
Antiguo 03-08-2008
Avatar de kurono
[kurono] kurono is offline
Miembro Premium
 
Registrado: jul 2007
Ubicación: Republica Dominicana
Posts: 1.126
Reputación: 18
kurono Va por buen camino
amigo delphius ya termine el cronometro y funciona perfectamente

Código Delphi [-]
  public
    { Public declarations }
    segundos,minuto,hora:integer;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
segundos:=segundos+1;
label1.Caption:=inttostr(segundos);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
minuto:=0;
segundos:=0;
hora:=0;
timer1.Enabled:=true;
timer2.Enabled:=true;
timer3.Enabled:=true;

end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
minuto:=minuto+1;
label2.Caption:=inttostr(minuto);
segundos:=00;
end;

procedure TForm1.Timer3Timer(Sender: TObject);
begin
hora:=hora+1;
label3.Caption:=inttostr(hora);
end;

end.

pero como decias antes hay forma mas facil de hacer y me estaba preguntando si no habra un componente que haga estoy solo para reducir el tiempo de programacion en otra ocacion
Responder Con Cita