Type | Description | |||
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:
// OLECompleteDrag event is not supported. Use the DragEnter,DragLeave,DragOver, DragDrop ... events. // OLECompleteDrag event is not supported. Use the DragEnter,DragLeave,DragOver, DragDrop ... events. |
private void OLECompleteDrag(object sender, AxEXTHUMBNAILLib._IThumbnailEvents_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: AxEXTHUMBNAILLib._IThumbnailEvents_OLECompleteDragEvent); begin end; begin event OLECompleteDrag(long Effect) end event OLECompleteDrag Private Sub OLECompleteDrag(ByVal sender As System.Object, ByVal e As AxEXTHUMBNAILLib._IThumbnailEvents_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(oThumbnail,Effect) RETURN |
<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 |