Listo amigos ya me quedo resuelto el problemilla que tenia, les pongo el codigo para futuras consultas
Código Delphi
[-]
procedure TCONTROLPHONE.Timer1Timer(Sender: TObject);
begin
segundos := segundos + 1;
Label3.caption := TimeToStr(segundos / (24*60*60));
end;
Y en el evento Onshow le puse este codigo
Código Delphi
[-]
procedure TCONTROLPHONE.FormShow(Sender: TObject);
begin
LongTimeFormat := 'hh:mm:ss';
Label3.caption := TimeToStr(0);
Timer1.enabled := true;
segundos := 0;
end;
Y en la parte de private
Código Delphi
[-]
private
segundos : longint;
y con eso me funciono lo que esta buscando, espero que les ayude a futuras consultas y gracias a todos.