Código Delphi [-] if (Panel17.Color = clRed) and (Panel18.Color = clRed) then Panel7.Color:= clRed;
if (Panel17.Color = clRed) and (Panel18.Color = clRed) then Panel7.Color:= clRed;