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