Datum und Uhrzeit in einer Statusbar anzeigen...

[Christian Seehase]

Moin Hummer,

wie machst Du es denn?
Immerhin scheint es ja ansonsten (bei anderen) zu funktionieren.

[dopeline]

Also:

Delphi-Quellcode:

procedure TFormHaupt.Timer1Timer(Sender: TObject);
var 
  hr, min, sec, msec: Word;
begin
DecodeTime(now, hr, min, sec, msec);
StatusBar1.Panels[2].Text := FormatDateTime ('hh:nn', Now);
Statusbar1.Panels[1].text := DateToStr(now);
end;

Im Panel[2] wird die Zeit und in dem Anderen das Datum ausgegeben.
Zuuvor muss man natürlich in der statusbar panels erzeugen (doppelt auf die bar klicken und "neue hinzufügen")

(Etwa) Noch Fragen? :wink:

Grüße, dopeline :dancer:

[hummer]

Danke, hab noch mal ausprobiert und jetzt funktionierts. Keine Ahnung was ich da falsch gemacht habe. :freak: