Bernardini Lido ha scritto:
Bart Aimar ha scritto:
Al solito... intuisco qualcosa ma non capisco...
Vorrebbe dire che il codice che hai postato è ulteriormente
semplificabile? ...??...
Ho provato a eliminare la funzione getRange con il suo ciclo do loop,
ma senza il ciclo di attesa il processo basic si interrompe lasciando
in esecuzione il listener in background di conseguenza si perde
l' impostazione della variabile lcolorSRC
Ho provato a impostare il primo range selezionato a MyApp_mousePressed
e il secondo a MyApp_mouseReleased, ma non funziona
Allora sembrerebbe di no...
Intanto ripropongo il codice originale con l' aggiunta di un MsgBox, come
richiesto da Bart, con un pulsante Annulla per dare la possibilità
all' utente di ripensarci
Il problema non è che l'utente ci ripensi (anche se succede...), quanto
far si che quella msgbox si chiuda da sola semplicemente cliccando il
range...
Altrimenti si deve cliccare una volta in più... ritrovandosi nuovamente
spaesati...
Io speravo in qualche opzione nascosta di msgbox, o a qualche altro
trucchetto... :-(
REM ***** BASIC *****
...zot...
qui c'è un refuso... manca la chiusura dell'if...
Sub RegisterMouseClickHandler
oDocView = ThisComponent.getCurrentController()
If Not IsNull(oMouseClickHandler) Then
oDocView.removeMouseClickHandler(oMouseClickHandler)
end if ' io l'ho infilata qui... va bene?
oMouseClickHandler=createUnoListener("MyApp_","com.sun.star.awt.XMouseClickHandler")
oDocView.addMouseClickHandler(oMouseClickHandler)
End Sub
grazie Lido
Bart
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
