Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   MDIapp mit StatusBar (https://www.delphipraxis.net/135825-mdiapp-mit-statusbar.html)

Kunoishi 18. Jun 2009 14:05


MDIapp mit StatusBar
 
in meinem MdIapp habe ich folgende procedure

Delphi-Quellcode:
procedure TMainForm.Timer1(Sender: TObject);
begin
StatusBar.Panels.Items[1].Text := DateToStr(Now);
StatusBar.Panels.Items[2].Text := TimeToStr(Now);
end;
in der Statusbar wird das auch angezeigt.

jetzt wollte ich in einem untergeordnetem Fenster
in einem Editfeld jeweils das das Datum bzw. die Uhrzeit
durch einen Klick aus der Statusbar übernommen wird.

Delphi-Quellcode:
procedure TerfassungForm.EditTdatumClick(Sender: TObject);
begin
EditTatdatum.Text := MainForm.StatusBar.Panels.Items[1].Text;
end;

procedure TerfassungForm.EditTzeitClick(Sender: TObject);
begin
EditTatzeit.Text := MainForm.StatusBar.Panels.Items[2].Text;
end;

die Zeit wird jedoch nicht 1 zu 1 übernommen und hinkt hinterher.
die Frage ist nur warum und wie kann ich das Problem lösen ?

[edit=Luckie]Delphi-Tags ergänzt. Mfg, Luckie[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz