Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Functions on _screen
Hi,
is there a possibility to use the OLEDragDrop procedure of the screen? I tried the following:
_screen.OLEDragMode=1
_screen.NewObject("oSh","ScreenHook","screenhook.prg")
DEFINE CLASS Screenhook as Custom
oScr = _screen
oScr.oledragmode=1
FUNCTION oScr.OLEDragDrop(oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord)
MESSAGEBOX("Olè. Viva Èspana!")
ENDFUNC
FUNCTION oScr.Click()
MESSAGEBOX("Clicked.")
ENDFUNC
ENDDEFINE
The click event works while the OLEDragDrop doesnt do anything. No error, no result. Just sleeping.
...gerhard...
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement