Detectar clic derecho del raton
 

Hola muy buenas y de antemano gracias por su atencion.. mire me gustaria saber como puedo detectar cuando se da clic derecho / izquierdo del raton sobre un determinado componente.. ya ven ke tenemos el popumenu y hace esa funcion damos clic derecho y aparece dicho menu...

a mi me gustaria ke en ves de un popup menu, pudiera yo mostrar un formulario personalizado... gracias por su respuesta de antemano

con el evento OnMouseDown o OnMouseUp, uno de los parametros es el boton que presionaste

Aquí te va un ejemplo por si no te alcanza con lo anterior:

Inserta un Botón y en el evento OnMouseDown pon este código:

if shift=[ssright] then
Showmessage('Clic Derecho')

Espero te ayude;)

Mira esto haber si te sirve.

Código Delphi [-]
 
procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Case Button of
     mbLeft : ShowMessage('Click en Botón Izquierdo');
     mbRight : ShowMessage('Click en Botón Derecho');
     mbMiddle : ShowMessage('Click en Botón Central');
  end;
end;

Saludos.

Es un poco tardepero bueno
 

Salud0s a todos , he encontrado este tema ya varias veces por todo el foro

bueno lo que hice fue poner este codigo en la aplicacion pero primero
agrege el componente TAplicationEventes y en su evento Onmessage puse el siguiente codigo


espero que le sirva al igual como lo hizo conmigo un saludo y gracias