PDA

Ver la Versión Completa : [Sintaxis] Botón derecho del ratón


Josber
12 de febrero de 2015, 11:11
¿Alguien me puede decir como controlo que se ha pulsado el botón derecho del ratón sobre una imágen?


Muchas gracias.-

Kuk
12 de febrero de 2015, 13:14
Con que control estas mostrando la imagen? Mira en Eventos a ver si hay un OnMouseDown. Los controles que lo tienen en la LINKAGE viene una variable con el indice del boton pulsado.

Josber
12 de febrero de 2015, 15:53
Es un Image Control Kuk, y en el evento MouseDown que tengo, vienen éstas variables:


01 POW-ARG-BUTTON PIC S9(4) COMP-5.
01 POW-ARG-SHIFT PIC S9(4) COMP-5.
01 POW-ARG-X PIC S9(9) COMP-5.
01 POW-ARG-Y PIC S9(9) COMP-5.
PROCEDURE DIVISION USING POW-ARG-BUTTON POW-ARG-SHIFT POW-ARG-X POW-ARG-Y.


Supongo que será algo así como

IF POW-ARG-BUTTOM = ?????????

Pero no sé exactamente con qué compararla :confused: :confused:

Un saludo.-

Kuk
12 de febrero de 2015, 16:09
Josber, haz esto:



INVOKE POW-SELF "DisplayMessage" USING POW-ARG-BUTTON



Prueba los 3 botones del raton, asi veras cual es cual ;)

Josber
12 de febrero de 2015, 16:29
Solucionado Kuk, es


IF POW-ARG-BUTTOM = 2
.
.
.
END-IF.

Los valores son:

Botón derecho = 2
Botón izquierdo = 1
Botón central = 4

Gracias por la ayuda Kuk

Un saludo.-