Hallo,
implementiere einfach ein neues TThread-Derivat (Date->Neu->Thread).
Definiere ein public-feld "window" bzw. ein private-Feld "Window", das du im Konstruktor belegen lässt.
Definiere eine Prozedur "DoWindowOperation", in der du Fenster-Operationen durchführst und private-felder für alle Informationen, die diese Prozedur brauchen könnte.
In deiner überschriebenen Execute-Methode gehst du nun so vor:
Delphi-Quellcode:
self.WindowOperationType := wotSetLabelCaption;
self.WOpTargetLabel := SomeLabelIGotTheReference;
self.WOpTargetLabelNewCaption := '95%'; //whatever...
Synchronize(DoWindowOperation);
Selbstverständlich kannst du auch eine extra-Prozedur "UpdateProgressLabel" definieren.
Wichtig: Diese Prozedur kann leider keine Parameter übernehmen.
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1