Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
DragIcon questin in VFP 5.0
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
DragIcon questin in VFP 5.0
Divers
Thread ID:
00080972
Message ID:
00080972
Vues:
89
I have a form with an Activex control in it, and a command button.
For the command buttons DragIcon property I have: cross03.cur

When the user drags the icon over the activex control I want the
cursor to change to a nodrop01 cursor if it is not at the right place,
and cross03.cur when they at at a place they are allowed to drop. I
have the following code in the DragOver Property of the activeX
control:

LPARAMETERS oSource, nXCoord, nYCoord, nState
if upper(osource.name)='BTN_MEMORY'
mN_Resource=thisform.SchedOCX1.PointToResource(nXCoord,
nYCoord)
if mn_Resource < 0
osource.dragicon='nodrop01.cur'
else
osource.dragicon='cross03.cur'
endif
endif

Any help with this would be appreciated.

Kirk
Répondre
Fil
Voir

Click here to load this message in the networking platform