Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi SweetControls (https://www.delphipraxis.net/125330-sweetcontrols.html)

haalmu 4. Dez 2008 10:07


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

Nersgatt 4. Dez 2008 10:12

Re: SweetControls
 
Moin,

vermutlich einfach mit
Control.Colors.DisabledTextColor := clBlue;

Gruß,
Jens

haalmu 4. Dez 2008 10:31

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

DeddyH 4. Dez 2008 10:34

Re: SweetControls
 
Mal ins Blaue geraten:
Delphi-Quellcode:
Control.Colors[DisabledTextColor] := clBlue;

haalmu 4. Dez 2008 10:41

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

DeddyH 4. Dez 2008 10:42

Re: SweetControls
 
Hast Du die Sourcen? Dann schau doch mal nach, wie TSCEditCustomColors definiert ist.

haalmu 4. Dez 2008 10:59

Re: SweetControls
 
Hallo Detlef.
Leider habe ich die Sourcen nicht. Trotzdem vielen Dank.
Gruß Hans

DeddyH 4. Dez 2008 12:38

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 :(.

haalmu 4. Dez 2008 12:52

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 01:51 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