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?

Grüße, dopeline

[hummer]

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