[alexusankov]

Сообщение от NumLock

кошмар...

1. clGreen = TColor($008000);
2. ColorToString(clGreen) = "clGreen"
3. ColorToString($00008200) = $00008200

****
не совсем тебя понял. Я поправил сообщение выше - проблема решена.