[karlosgaviria]

TWinControl si funciona de esta manera:


procedure TNuevoLib.isbnEnter(Sender: TObject);
begin
(Sender as TWinControl).Brush.Color := clCream;
(Sender as TWinControl).Repaint;
end;