SftTree/DLL 7.5 - Tree Control
SftBox/OCX 5.0 - Combo Box Control
SftButton/OCX 3.0 - Button Control
SftMask/OCX 7.0 - Masked Edit Control
SftTabs/OCX 6.5 - Tab Control (VB6 only)
SftTree/OCX 7.5 - Tree Control
SftPrintPreview/DLL 2.0 - Print Preview Control (discontinued)
SftTree/DLL 7.5 - Tree Control
SftBox/OCX 5.0 - Combo Box Control
SftButton/OCX 3.0 - Button Control
SftDirectory 3.5 - File/Folder Control (discontinued)
SftMask/OCX 7.0 - Masked Edit Control
SftOptions 1.0 - Registry/INI Control (discontinued)
SftPrintPreview/OCX 1.0 - Print Preview Control (discontinued)
SftTabs/OCX 6.5 - Tab Control (VB6 only)
SftTree/OCX 7.5 - Tree Control
SftTabs/NET 6.0 - Tab Control (discontinued)
SftTree/NET 2.0 - Tree Control
An object is dragged over the control.
VB.NET | Private Sub object_OLEDragOver(ByVal sender As Object, ByVal e As EventArgumentType) Handles object.OLEDragOver |
VB | Private Sub object_OLEDragOver(Data As DataObject, TargetChar As Long, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single, State As SftMaskOLEDragOverConstants) |
C#.NET | void object_OLEDragOver(object sender, EventArgumentType e); |
VC++ | void OnOLEDragOverobject(struct IVDMDataObject** Data, long* TargetChar, long* Effect, short* Button, short* Shift, float* x, float* y, enum SftMaskOLEDragOverConstants* State); |
C | HRESULT OnOLEDragOverobject(struct IVDMDataObject** Data, long* TargetChar, long* Effect, short* Button, short* Shift, float* x, float* y, enum SftMaskOLEDragOverConstants* State); |
object
Data
A DataObject object containing formats that the source will provide and, in addition, possibly the data for those formats. If no data is contained in the DataObject, it is provided when the control calls the GetData method. The SetData and Clear methods cannot be used here.
TargetChar
Describes the default insertion point where the data is to be inserted. On return from the OLEDragOver event this insertion point will become the new insertion point. TargetChar can be modified to cause a different location to be the drop target. It can be set to -1 in which case no insertion point exists. Valid values for TargetChar are between -1 and Length(Text).
Effect
A Long variable set by the source object identifying all effects it supports. This parameter must be correctly set by the target component during this event. The value of Effect is determined by logically Or'ing together all active effects. The target component should check these effects and other parameters to determine which actions are appropriate for it, and then set this parameter to one of the allowable effects (as specified by the source) to specify which actions will be performed if the user drops the selection on the component.
Effect | Value | Description |
---|---|---|
vbDropEffectNone | 0 | Drop target cannot accept the data. |
vbDropEffectCopy | 1 | Drop results in a copy of data from the source to the target. The original data is unaltered by the drag operation. |
vbDropEffectMove | 2 | Drop results in data being moved from the drag source to the drop source. The drag source should remove the data from itself after the move. |
Note: Only Visual Basic offers the predefined constants vbDropEffectNone, etc. When using other languages, the constants have to be defined explicitly by the application.
Button
Describes the button(s) that are pressed. The Button argument is a bit field with bits corresponding to the left button, right button and middle button. These bits correspond to the values shown below. Only one of the bits is set, indicating the button that caused the event.
Button | Value | Description |
---|---|---|
constSftMaskLeftButton | 1 | The left mouse button was pressed. |
constSftMaskRightButton | 2 | The middle mouse button was pressed. |
constSftMaskMiddleButton | 4 | The right mouse button was pressed. |
Shift
Describes the state of the SHIFT, CONTROL and ALT keys. A bit is set if the key is down. The Shift argument is a bit field with bits corresponding to the SHIFT, CONTROL and ALT keys. It indicates the state of these keys. Some, all, or none of the bits can be set, indicating which of the keys are pressed.
Shift | Value | Description |
---|---|---|
constSftMaskShiftMask | 1 | The SHIFT key is down. |
constSftMaskCtrlMask | 2 | The CONTROL key is down. |
constSftMaskAltMask | 4 | The ALT key is down. |
x
The x coordinate of the mouse cursor. The units used depend on the container (Visual Basic, Visual C++, etc.) and the coordinate system used.
y
The y coordinate of the mouse cursor. The units used depend on the container (Visual Basic, Visual C++, etc.) and the coordinate system used.
State
Defines the transition state of the data being dragged in relation to the target control.
State | Value | Description |
---|---|---|
enterSftMask | 0 | Source component is being dragged within the range of a target. |
leaveSftMask | 1 | Source component is being dragged out of the range of a target. |
overSftMask | 2 | Source component has moved from one position in the target to another. |
The OLEDragOver event occurs when an object is dragged over the control.
The source control should always mask values from the Effect parameter to insure compatibility with future implementations of OLE drag & drop. Presently, only three bits in the Effect parameter are used. In future versions other bits may be used. As a precaution against future problems, drag sources and drop targets should mask these values appropriately before performing any comparisons.
For example, a source component should not compare an Effect against, for example, vbDropEffectCopy, such as:
If Effect = vbDropEffectCopy...
Instead, the source component should mask the value or values being sought, as here:
If (Effect And vbDropEffectCopy) = vbDropEffectCopy...
-or-
If (Effect And vbDropEffectCopy)...
This allows for the definition of new drop effects in future versions while preserving compatibility with existing code.
S = e.data.GetData(SftOLEClipboardConstants.sftCFText) AxSftMask1.SelStart = e.targetChar AxSftMask1.SelText = S Else e.effect = 0 ' vbDropEffectNone End If End Sub Private Sub AxAxSftMask1_OLEDragOver(ByVal sender As Object, ByVal e As AxSftMaskLib70._ISftMaskEvents_OLEDragOverEvent) Handles AxSftMask1.OLEDragOver If e.targetChar < 0 Then ' Outside edit control (on caption) e.effect = 0 ' vbDropEffectNone Else ' Inside edit control If e.data.GetFormat(SftOLEClipboardConstants.sftCFText) Then ' OK, we have a text format
S = Data.GetData(sftCFText) SftMask1.SelStart = TargetChar SftMask1.SelText = S Else Effect = vbDropEffectNone End If End Sub Private Sub SftMask1_OLEDragOver(Data As SftMaskLib70.DataObject, TargetChar As Long, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single, State As SftMaskLib70.SftMaskOLEDragOverConstants) If TargetChar < 0 Then ' Outside edit control (on caption) Effect = vbDropEffectNone Else ' Inside edit control If Data.GetFormat(sftCFText) Then ' OK, we have a text format
s = (string) e.data.GetData(SftOLEClipboardConstants.sftCFText); axSftMask1.SelStart = e.targetChar; axSftMask1.SelText = s; } else { e.effect = 0; //vbDropEffectNone } } private void axSftMask1_OLEDragOver(object sender, AxSftMaskLib70._ISftMaskEvents_OLEDragOverEvent e) { if (e.targetChar < 0) { // Outside edit control (on caption) e.effect = 0; //vbDropEffectNone } else { // Inside edit control if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFText)) {
_variant_t data = pData->GetData(_variant_t((long) sftCFText)); data.ChangeType(VT_BSTR); m_pMask1->SelStart = *TargetChar; m_pMask1->SelText = data.bstrVal; } else *Effect = DROPEFFECT_NONE; } void CProject1Dlg::OnOLEDragOverSftMask1(LPDISPATCH FAR* Data, long FAR* TargetChar, long FAR* Effect, short FAR* Button, short FAR* Shift, float FAR* x, float FAR* y, long FAR* State) { IVDMDataObjectPtr pData = *Data; if (*TargetChar < 0) { // Outside edit control (on caption) *Effect = DROPEFFECT_NONE; } else {
See Also SftMask Events | Object Hierarchy