Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Drag & Drop Questions
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00593901
Message ID:
00593960
Vues:
28
Caroline,

>What I do is somethig along these lines.

Thank you for your help. Unfortuantly, I'm trying to do things the hard way. I need to do my processing in my source object with some data from my target object. I think I need to pass an object reference for that to work.

Now all I need to figure out is how to impliment drag & drop in an OLEControl.

>
>On the Source item set up a Data set of an array with the data you want to pass across.
>
>
<b>OLESetData</b>
>local laData[2]
>
>laData[1] = <SomeData>
>laData[2] = <SomeOtherData>
>oDataObject.SetData(@laData, "OLE Variant Array")
>
><b>OLEStartDrag</b>
>Lparameters oDataObject, nEffect
>
>oDataObject.ClearData
>oDataObject.SetFormat("OLE Variant Array")
>
>
>On the Target Check for the existence of the correct type of data then do something with it.
>
>
<b>OLEDragOver</b>
>If oDataObject.GetFormat("OLE Variant Array")
>	This.OLEDropHasData = 1
>	This.OLEDropEffects = 1
>	nEffect = 1
>EndIf
>
>
><b>OLEDragDrop</b>
>Local laData[1]
>
>If oDataObject.GetFormat("OLE Variant Array")
>	oDataObject.GetData("OLE Variant Array", @laData)
>	
>	... Do something with the data here.
>endif
>
>HTH
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform