Código Delphi [-](Sender as TWinControl).Color := clWindow;
(Sender as TWinControl).Color := clWindow;