event OLECompleteDrag (Effect as Long)
Occurs when a source component is dropped onto a target component, informing the source component that a drag action was either performed or canceled

TypeDescription
Effect as Long A long set by the source object identifying the action that has been performed, thus allowing the source to take appropriate action if the component was moved (such as the source deleting data if it is moved from one component to another

The OLECompleteDrag event is the final event to be called in an OLE drag/drop operation. This event informs the source component of the action that was performed when the object was dropped onto the target component. The target sets this value through the effect parameter of the OLEDragDrop event. Based on this, the source can then determine the appropriate action it needs to take. For example, if the object was moved into the target (exDropEffectMove), the source needs to delete the object from itself after the move. The control supports only manual OLE drag and drop events. In order to enable OLE drag and drop feature into control you have to set the OLEDropMode and OLEDrag properties. 

The settings for Effect are:

Syntax for OLECompleteDrag event, /NET version, on: 

// OLECompleteDrag event is not supported. Use the DragEnter,DragLeave,DragOver, DragDrop ... events.


// OLECompleteDrag event is not supported. Use the DragEnter,DragLeave,DragOver, DragDrop ... events.

Syntax for OLECompleteDrag event, /COM version, on: 

private void OLECompleteDrag(object sender, AxEXGANTTLib._IGanttEvents_OLECompleteDragEvent e)
{
}


void OnOLECompleteDrag(long Effect)
{
}


void __fastcall OLECompleteDrag(TObject *Sender,long Effect)
{
}


procedure OLECompleteDrag(ASender: TObject; Effect : Integer);
begin
end;


procedure OLECompleteDrag(sender: System.Object; e: AxEXGANTTLib._IGanttEvents_OLECompleteDragEvent);
begin
end;


begin event OLECompleteDrag(long Effect)
end event OLECompleteDrag


Private Sub OLECompleteDrag(ByVal sender As System.Object, ByVal e As AxEXGANTTLib._IGanttEvents_OLECompleteDragEvent) Handles OLECompleteDrag
End Sub


Private Sub OLECompleteDrag(ByVal Effect As Long)
End Sub


Private Sub OLECompleteDrag(ByVal Effect As Long)
End Sub


LPARAMETERS Effect



PROCEDURE OnOLECompleteDrag(oGantt,Effect)
RETURN

Syntax for OLECompleteDrag event, /COM version (others), on: 

<SCRIPT EVENT="OLECompleteDrag(Effect)" LANGUAGE="JScript">
</SCRIPT>


<SCRIPT LANGUAGE="VBScript">
Function OLECompleteDrag(Effect)
End Function
</SCRIPT>


Procedure OnComOLECompleteDrag Integer llEffect
	Forward Send OnComOLECompleteDrag llEffect
End_Procedure


METHOD OCX_OLECompleteDrag(Effect) CLASS MainDialog
RETURN NIL


// OLECompleteDrag event is not supported. Use the DragEnter,DragLeave,DragOver, DragDrop ... events.


function OLECompleteDrag as v (Effect as N)
end function


function nativeObject_OLECompleteDrag(Effect)
return