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