Detectar clic derecho del raton

[[egostar]]

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.

[cesar78200921]

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

 if  (Msg.message >= WM_RBUTTONDOWN) AND
     (Msg.message <= WM_RBUTTONDBLCLK) then
    Handled := TRUE;

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