Ciao a tutti
Volevo bloccare l' uso del mouse durante l' esecuzione di una macro
ho scritto il codice che riporto sotto
Ho notato, però, che durante l' esecuzione viene bloccato solo il tasto
sinistro, mentre il destro è ancora attivo
Sbaglio qualcosa?
Oppure XMouseClickHandler intercetta solo il tasto sinistro
Da quel che credo di capire dalle Api dovrebbe intercettare qualsiasi tasto
che viene premuto
Codice
REM ***** BASIC *****
Sub Main
oDocView = ThisComponent.getCurrentController()
RegisterMouseClickHandler
on error goto cleanExit
Wait 5000
cleanExit:
UnregisterMouseClickHandler
End Sub
Sub RegisterMouseClickHandler
oMouseClickHandler = createUnoListener("MyApp_",_
"com.sun.star.awt.XMouseClickHandler")
oDocView.addMouseClickHandler(oMouseClickHandler)
End Sub
Sub UnregisterMouseClickHandler
on error resume next
oDocView.removeMouseClickHandler(oMouseClickHandler)
End Sub
Function MyApp_disposing(oEvt)
End Function
Function MyApp_mousePressed() As Boolean
MyApp_mousePressed = True
End Function
Function MyApp_mouseReleased() As Boolean
MyApp_mouseReleased = False
End Function
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]