TColor als normaler Text (clRed -> Rot)

[hoika]

Hallo,

gibt es eine Funktion, die mir zu clred den Text "Rot" ausgibt ?
ColorToString erzeugt ja direkt clRed.

Ich weiss natürlich, dass TColor beliebige Farben annehmen kann,
aber ein paar Farben sind ja per clXXX vordefiniert.

Danke


Heiko

[taaktaak]

Ich denke nicht, in Graphics sind nur die englischen Farbnamen definiert. Wirst du wohl selbst übersetzen müssen.

[hoika]

Hallo,

Schade.



Heiko

[mkinzler]

Schreib dir doch eine Ersetzungsfunktion ('clRed' -> 'Rot')

[SirThornberry]

Zitat von taaktaak:

Ich denke nicht, in Graphics sind nur die englischen Farbnamen definiert. Wirst du wohl selbst übersetzen müssen.

hast du eine englisch eoder deutsche Delphiversion?

[taaktaak]

Na, der Aufwand ist aber nicht so sehr groß (20 Farben), oder willst du auch die symbolischen Konstanten von Windows übersetzen?

[mkinzler]

Ich habe die deutsche und dort gibt es auch nur englische Farbkonstanten

[hoika]

Hallo,

ja, auch die deutsche Version liefert clRed zurück.
Hätte ja sein können, dass sowas schon existiert.


Heiko

[uligerhardt]

In der Unit ExtCtrls gibt's eine Funktion ColorToPrettyName, die vielversprechend ausschaut. Leider hat Borland die nicht im Interface zugänglich gemacht.
Man könnte natürlich tricksen: Eine Dummy-TColorBox anlegen und die Strings auslesen. Oder so.

[taaktaak]

Seltsam, bei mir (D7) findet sich nur ein const-array ColorToPretyName, aber keine Funktion. Die deutschen Farben sind im Array nicht enthalten. Ist das in höheren Versionen anders???