Hola Carlos.
Como comenté, la tercera "expresión" es clRed. Un
case siempre compara.
En cuanto a que sí te funciona, no es de extrañarse mucho, simplemente te ha tocado que los bits "coincidan", pero es muy arriesgado y desaconsejable hacerlo de esa manera. Con otras constantes de color podría fallarte.
Estoy en un café Internet sin Delphi a la mano para ver el patrón de bits de clRed y otras constantes de color que pudiera tomar como ejemplo, pero reafirmo lo dicho en mi comentario de arriba.
Saludos.
Al.