afficher date et l'heure

Réponse acceptée !
Salut;
pour afficher la date et l'heure c'est facile :
Label1.Caption := DateTimeToStr(Now); // Affiché ensemble

Label1.Caption := DateToStr(Date);
Label2.Caption := TimeToStr(Time); // Affiché séparément

@+
Cirec

Réponse acceptée !
salut
tu mets un timer réglé à 1000 (1s) l'affichage sera rafraichi toutes les secondes
et dans l'évèment on timer
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  label1.Caption := TimeToStr(now);
end;
@+
jlen