Hej DPler,
folgende Frage mit der Bitte um Eure Hilfe:
Während eines Zugriffs auf die serielle Schnittstelle, der rund 20 sek. dauert, soll eine Waitscreen mit diversen Statusmeldungen, Progressbar etc. angezeigt werden.
Ursprünglich hatte ich es so gelöst, dass ich das wait-form erzeuge:
Delphi-Quellcode:
frm_wait := Tfrm_wait.Create(self);
try
frm_wait.ShowModal;
finally
frm_wait.Free;
end;
In diesem Form hatte ich einen Timer, der einen Progressbar auffüllt, sowie zu bestimmten Zeitpunkten die Labels ändert. Primitiv, funktioniert aber.
Jetzt reicht das aber nicht mehr, die Zeitpunkte, zu denen die Labels geändert werden müssen, sind nicht mehr fix, sondern variabel. Überdies sind sie nur dem aufrufenden Hauptprogramm bekannt.
Daher dachte ich, es wäre klüger, den Timer auf das hauptform zu ziehen und von dort alle Komponenten (Progressbar, Labels) des wait-forms zu steuern. Dabei taucht aber das Problem auf: wie erreiche ich das waitform? Jetzt wird es natürlich modal erzeugt und dann passiert solange nichts, bis es wieder geschlossen wird, der Timer lässt sich noch nicht triggern. Und wenn ich den timer vorher enable, dann versucht das ontimer-event auf komponenten zuzugreifen, die noch nicht erzeugt sind ...
Mir fehlt hier jetzt der Plan.
Vielen Dank und Gruß
tom