AW: Label Text ändern aus einem Thread heraus
Zitat:
Wenn jetzt noch jemand den anderen Thread findet, wo schonmal jemand genau das gleiche Problem hatte ......... Das erste Fenster wird zur Mainform und Visible auf True umgestellt und das zweite Fenster wird als Letztes in die böse gloable Variable geschrieben. |
AW: Label Text ändern aus einem Thread heraus
Zitat:
Nochmal Danke für die Hilfe :thumb: |
AW: Label Text ändern aus einem Thread heraus
Und exakt genau das ist der Grund, weswegen diese globalen Formularvariablen echt gefährlich sein können. Andere globale auch, aber hier noch mehr, da Automatismen der IDE greifen, die man nicht bewusst selbst implementiert hat. Ich habe mir die Benutzung dieser Variablen komplett abgewöhnt. In der Form-Klasse gehört "self" genutzt (extrem wichtig, gerade in so fällen wie hier passiert sind!), und alles externe bekommt genau die Parameter mit, an denen es etwas ändern soll. Sei es ein Label, ein Canvas, oder im Zweifel gleich ein Form-Handle.
In deinem Fall wäre z.B. folgendes einigermaßen sauber:
Delphi-Quellcode:
So wäre immer sicher gestellt, dass das Label der Instanz geändert wird, auf der auch der Button liegt, der tatsächlich geklickt wurde. Komplett ohne diese gräßliche gloabele Form-Variable.
procedure TOverviewF.btn1Click(Sender: TObject);
begin lblTaskBackground.Caption := ''; ChangeLabelCaption(lblTaskBackground); end; procedure ChangeLabelCaption(aLabel: TLabel); begin aLabel.Caption := 'Hallo zusammen!'; end; |
AW: Label Text ändern aus einem Thread heraus
Genau deswegen sollte man mit diesen Variablen vorsichtig sein.
Schlimm und vorallem grob fahrlässig ist die Verwenddung dieser Variablen innerhalb der eigenen Klasse.
Delphi-Quellcode:
Und das betrifft nicht nur Form-Variablen.
procedure TForm1.Button1Click(Sender: TObject);
begin Form1.Label1.Caltion := 'Fehler, wenn Form1 nicht die eigene Instanz enthält'; Self.Label1.Caltion := 'OK, auch wenn nicht unbedingt nötig'; Label1.Caltion := 'OK'; end; Zitat:
Zitat:
Zitat:
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:17 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