Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Detectar cuando el cursor pasa por encima de un componente (https://www.clubdelphi.com/foros/showthread.php?t=95946)

chinchan 04-11-2022 19:58:49

Detectar cuando el cursor pasa por encima de un componente
 
Hola. Estoy diseñando un aplicación y me gustaría cambiar el color de un componente TPanel cuando pasa el cursor del ratón por encima de este componente. Podríais indicarme cómo hacerlo?. Muchas gracias.

Casimiro Notevi 04-11-2022 20:36:24

Primero pones la propiedad ParentBackground a false y luego algo parecido a esto:
Código Delphi [-]
procedure TForm1.Panel1MouseLeave(Sender: TObject);
begin
  panel1.Color := clBtnFace;
end;

procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,  Y: Integer);
begin
  panel1.Color := clGreen;
end;

chinchan 07-11-2022 13:56:37

Muchas Gracias, Casimiro. Funciona perfectamente y más sencillo de lo que creía.

Casimiro Notevi 07-11-2022 14:09:43

^\||/^\||/^\||/


La franja horaria es GMT +2. Ahora son las 20:13:41.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi