![]() |
SweetControls
Hallo und guten Tag,
ich möchte während der Laufzeit ein SCEdit erstellen und dabei die Eigenschaft DisabledTextColor ändern. Diese Eigenschaft wird im ObjectInspector unter Eigenschaften Colors (TSCEditCustomColors) DisabledTextColor clGray ... angezeigt. Wie gesagt ich möchte die Farbe in clBlue ändern. Ich denke ich muss irgendwie auf (TSCEditCustomColors) zugreifen, aber wie??? Ich hoffe Jemand kann mir helfen. Vielen Dank im Vorraus PS. das TScEdit entstammt den SweetControls |
Re: SweetControls
Moin,
vermutlich einfach mit Control.Colors.DisabledTextColor := clBlue; Gruß, Jens |
Re: SweetControls
Hallo Jens, vielen Dank für deine Antwort.
Leider haut das so nicht hin. Hier nochmal das Problem: In dem Control TSCEdit wird in Eigenschaften "Colors (TSCEditCustomColors)" angezeigt, wobei unter anderem die Eigenschaft DisabledTextColor geändert werden kann. Es ist also in TSCEdit ein TSCEditCustomColors vorhanden auf das ich zugreifen möchte. Es tut mir leid, wenn ich das nicht besser erklären kann, wäre aber für jede Hilfe dankbar. Gruß Hans |
Re: SweetControls
Mal ins Blaue geraten:
Delphi-Quellcode:
Control.Colors[DisabledTextColor] := clBlue;
|
Re: SweetControls
Hallo Jens,
leider ist das nicht die Lösung. Trotzdem Danke für deine Hilfe. Vielleicht fällt dir ja noch was ein. Gruß Hans |
Re: SweetControls
Hast Du die Sourcen? Dann schau doch mal nach, wie TSCEditCustomColors definiert ist.
|
Re: SweetControls
Hallo Detlef.
Leider habe ich die Sourcen nicht. Trotzdem vielen Dank. Gruß Hans |
Re: SweetControls
Ich hab mir mal die Trial installiert. TSCEditCustomColors scheint eine Klasse zu sein, aber wie man da gezielt auf DisabledColor zugreift, hab ich leider auch nicht herausfinden können :(.
|
Re: SweetControls
Hallo an Alle!
Habe die Lösung gefunden: TSCEditCustomColors(SCEdit1[intCount].Colors).DisabledTextColor := clBlue; So habe ich rumprobiert! Compiler meckerte: Undefinierter Bezeichner DisabledTextColor Dann habe ich das probiert: TSCEditColors(SCEdit1[intCount].Colors).DisabledTextColor := clBlue; Es Läuft!!!! Trotzdem merkwürdig, habe die Bezeichnung TSCEditCustomColors aus dem ObjectInspector. Die Bezeichnung TSCEditColors gibts da gar nicht. Wie dem auch sei, vielen Dank an alle die sich die Mühe gemacht haben, mir zu helfen. Gruß Hans |
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:12 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz