¿como ponerle la hora del windows al programa?

[soma25]

hola

estoy terminando el proyecto quue tengo, para finalizar quiero ponerle el reloj del sistema de windows.

mi pregunta es:¿como es el codigo para poner el reloj de windows en el programa, y con que componente se podria poner el reloj?


gracias


atte

soma25

[The_Duke]

pon unTTimer y un statusbar

procedure TForm1.Timer1Timer(Sender: TObject);
begin
statusbar1.Panels[1].Text:='Hora:'+timetostr(time);
end;

[soma25]

hola

mas o menos le entiendo pero mi pregunta era si se podia poner la hora del sistema mediante un maskedit, un caption.


me podrias decir mejor como se pone la hora del sistema por los componentes?

gracias

atte

soma25

[dec]

Hola,

Creo que la clave te la ha dado el compañero con la variable "Time" y la función "TimeToStr". En "Time" tienes a tu disposición la hora del sistema en formato "TDateTime", que con la función "TimeToStr" puedes convertir en una cadena.

Dicho eso puedes mostrar la hora del sistema prácticamente en cualquier lado...

Código Delphi [-]
  Edit1.Text := TimeToStr(Time);

  Self.Caption := TimeToStr(Time);

  Memo1.Lines.Add(TimeToStr(Time));

  Label1.Caption := TimeToStr(Time);

  MaskEdit1.Text := FormatDateTime('hh:mm:ss', Time);

Claro que Delphi cuenta con otras funciones que pueden interesarte, como por ejemplo "FormatDateTime", que se utiliza más arriba, porque el componente "MaskEdit1" cuenta con una "máscara" predeterminada para mostrar una hora, y esta ha de tener determinado formato, o de otro modo no se vería "bien".

Echa un vistazo en la ayuda de Delphi sobre "Time", "Date", "Now", "TimeToStr", "FormatDateTime", la unidad "SysUtils", la unidad "DateUtils",... aunque tal vez con lo mencionado tengas resuelto más o menos lo que necesitas, según dices. ¿O no?

[soma25]

gracias

con lo que acabas de mostrar estoy mas que satisfecho


muchas gracias

atte

soma25