Ver Mensaje Individual
  #2  
Antiguo 04-11-2022
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.671
Reputación: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
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;
Responder Con Cita