LabeledEdit: Wie wird Label enabled/disabled?

[Helmi]

Hallo,

bei der Komponente LabeledEdit wird das Label auch auf Disabled geschaltet, wenn man

Delphi-Quellcode:

LabeledEdit.Enabled := false

macht.
Wo wird das ausgeführt?

[Björn Ole]

So gehts:

Delphi-Quellcode:

EnableWindow(LabeledEdit1.Handle, bEnable);

[Helmi]

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

[Luckie]

Wahrscheinlich genau so.

[Helmi]

Zitat:

Zitat von Luckie (Beitrag 1046187)

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:

Zitat von jfheins (Beitrag 1046190)

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".