SftMask/OCX 7.0 - ActiveX Masked Edit Control

Item Property, DataObjectFiles Object

Returns a specific filename by index from the DataObject.Files collection (sftCFFiles format only).

Syntax

Get

object

A DataObjectFiles object.

ItemIndex

The one-based position of the file name to be retrieved.

Item

Returns a specific filename by index from the DataObject.Files collection (sftCFFiles format only).

Comments

The Item property returns a specific filename by index from the DataObject.Files collection (sftCFFiles format only).

This property can be used to retrieve file names from the Files collection.

Examples

VB.NET

    AxSftMask1.OLEDropMode = SftMaskOLEDropModeConstants.OLEDropSftMaskManual
End Sub

Private Sub AxAxSftMask1_OLEDragDrop(ByVal sender As Object, ByVal e As AxSftMaskLib70._ISftMaskEvents_OLEDragDropEvent) Handles AxSftMask1.OLEDragDrop
    If e.data.GetFormat(SftOLEClipboardConstants.sftCFFiles) Then
        If e.data.Files.Count > 1 Then
            MsgBox("Only one file at a time please.")
        Else
            AxSftMask1.Text = e.data.Files.Item(1)
        End If
    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)

View Entire Sample Code

VB6

    SftMask1.OLEDropMode = OLEDropSftMaskManual
End Sub

Private Sub SftMask1_OLEDragDrop(Data As SftMaskLib70.DataObject, TargetChar As Long, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single)
    If Data.GetFormat(sftCFFiles) Then
        If Data.Files.Count > 1 Then
            MsgBox ("Only one file at a time please.")
        Else
            SftMask1.Text = Data.Files.Item(1)
        End If
    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)

View Entire Sample Code

C++

void CProject1Dlg::OnOLEDragDropSftMask1(LPDISPATCH FAR* Data, long FAR* TargetChar, long FAR* Effect, short FAR* Button, short FAR* Shift, float FAR* x, float FAR* y)
{
    IVDMDataObjectPtr pData = *Data;

    if (pData->GetFormat(sftCFFiles) != VARIANT_FALSE) {
        if (pData->Files->Count > 1)
            AfxMessageBox(_T("Only one file at a time please."), MB_OK, 0);
        else
            m_pMask1->Text = pData->Files->GetItem(1);
    }
}

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;

View Entire Sample Code

See Also DataObjectFiles Object | Object Hierarchy