![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Como deshabilitar el botón derecho del ratón????
Hola a todos:
Me gustaría saber como puedo deshabilitar el botón derecho del ratón en todo el FORM1, incluidos los componentes que haya en él. Gracias de Antemano Jorge ![]() |
#2
|
|||
|
|||
Hola amigo.
la verdad no entiendo mucho a que te refieres con desactivar el boton derecho en un form, esto no tiene mucho sentido a menos que tengas popmenus en los forms que estas programando. de todos modos eso me suena a una rutina de una api de windows, nunca lo he probado en delphi, pero busca en las ayudas del SDK de delphi, alli te describen las rutinas basicas del raton.... suerte
__________________
ing. frankmch |
#3
|
|||
|
|||
Hola:
Coincido con frankmch en que no parece muy clara la utilidad que le quieres dar a esto (salvo si tienes varios TPopupMenus). El siguiente código, tras colocar un componente TApplicationEvents, intercepta su evento OnMessage, e inutiliza la pulsación del botón derecho del ratón a nivel de tu aplicación (bueno y de las aplicaciones de quien lo quiera usar ... ![]() ![]() Código:
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin if InutilizarBotonDerechoMouse AND // variable booleana que activas cuando lo desees (Msg.message >= WM_RBUTTONDOWN) AND (Msg.message <= WM_RBUTTONDBLCLK) then Handled := TRUE; // con esto indicamos que ya hemos tratado el evento end;
__________________
Guía de Estilo |
#4
|
|||
|
|||
MMmm no me sale conrectamente
saludos Andres15959
He puesto el codigo tal y como lo pusiste pero la parte que dice InutilizarBotonDerechoMouse me da error mm de verdad nose que poner de antemano le doy las gracias |
#5
|
|||
|
|||
![]() Por fin lo desactive corretamente lo que hice fue modificar un poco el codigo
![]() Me ha quedado asi Gracias Última edición por nlsgarcia fecha: 10-01-2015 a las 16:33:00. Razón: Sintaxis Delphi |
#6
|
||||
|
||||
Recuerda poner los tags al código fuente, ejemplo:
![]() Gracias ![]()
__________________
La otra guía de estilo | Búsquedas avanzadas | Etiquetas para código | Colabora mediante Paypal |
#7
|
|||
|
|||
Gracias por el consejo Casimiro , Saludos y Gracias.
|
![]() |
|
|
![]() |
|