Definiere dir einfach einen Typ mit 3 Elementen, oder habe ich das jetzt falsch verstanden?
Delphi-Quellcode:
Type
TStatusType = ( stError, stWarning, stOk );
und dann ist halt stError mit rot, stWarning mit gelb und stOk mit grün hinterlegt. Auswählen tut er im
OI nur den Status.