[DarkMan]

Prueba con

Código Delphi [-]
if Panel1.Color=cl3DLight then Panel3.Color:=clRed;