<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") >>
<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>