TCustomRichViewEdit.OnOleDragOver [VCL and LCL]

<< Click to display table of contents >>

TCustomRichViewEdit.OnOleDragOver [VCL and LCL]

OLE drag&drop event. It occurs when the user moves the mouse pointer over the editor. Called only if the dragging was accepted in OnOleDragEnter (or automatically by the editor).

type

  TRVOleDragOverEvent = procedure (Sender: TCustomRichView;

    Shift: TShiftState; X, Y: Integer;

    PossibleDropEffects: TRVOleDropEffects;

    var DropEffect: TRVOleDropEffectof object;

property OnOleDragOver: TRVOleDragOverEvent;

(introduced in version 10)

This is a low level event. Do not use it if you are not familiar with OLE drag&drop.

OnOleDragEnter occurs before this event, with DataObject in parameters. Dragging will be finished either by calling OnOleDrop (successfully) or by calling OnOleDragLeave (canceled, or mouse left the editor).

Input Parameters:

DataObject dragged data (IDataObject is declared in ActiveX unit).

Shift keyboard state.

X,Y mouse cursor coordinates, relative to the top left corner of Sender.

PossibleDropEffects a list of allowed operations, set of rvdeCopy, rvdeMove, rvdeLink.

DropEffect operation that the editor would choose by default.

 

Output Parameters:

DropEffect operation that you want to perform with the dragged data (one of PossibleDropEffects, or rvdeNone if you do not want to accept it).

 

See also events:

OnOleDragEnter;

OnOleDragLeave;

OnOleDrop.

See also:

Drag&drop in TRichView.