LabeledEdit: Wie wird Label enabled/disabled?

[Helmi]

Hallo,

bei der Komponente LabeledEdit wird das Label auch auf Disabled geschaltet, wenn man LabeledEdit.Enabled := false macht.
Wo wird das ausgeführt?

[Björn Ole]

So gehts:
EnableWindow(LabeledEdit1.Handle, bEnable);

[Helmi]

Mich würds interessieren, wie das in LabeledEdit gemacht wird

[Luckie]

Wahrscheinlich genau so.

[Helmi]

Zitat von Luckie:

Wahrscheinlich genau so.

Möglich! Aber ich finde das nirgendswo

[Luckie]

Hast du die Quellcodes mal durchgeguckt? Und wozu musst du das wissen?

[jfheins]

Zitat:

Möglich! Aber ich finde das nirgendswo

Dann guck mal in der Unit ExtCtrls.pas in die Methode TCustomLabeledEdit.CMEnabledchanged

Bzw. noch tiefer in Controls.pas bei TWinControl.CMEnabledChanged - da ist dann auch der Aufruf von EnableWindow()

[Helmi]

Zitat von jfheins:

Zitat:

Möglich! Aber ich finde das nirgendswo

Dann guck mal in der Unit ExtCtrls.pas in die Methode TCustomLabeledEdit.CMEnabledchanged

Bzw. noch tiefer in Controls.pas bei TWinControl.CMEnabledChanged - da ist dann auch der Aufruf von EnableWindow()

Danke!
Manchmal sieht man den Wald vor lauter Bäumen nicht

[Luckie]

Und wie wird es jetzt gemacht?

[Daniel]

Völlig trivial. Das Label ist ein handelsübliches Label und privates Feld der Klasse TLabeledEdit. Dann horcht die Komponente auf die Botschaft "CMEnabledChanged" und aktiviert oder deaktiviert das Label über dessen Eigenschaft "Enabled".