Hide

SftMask/OCX 7.0 - ActiveX Masked Edit Control

Display
Print

Files Property, DataObject Object

Returns a collection of filenames used by the sftCFFiles format.

Syntax

Get

VB.NETFiles = object.Files As DataObjectFiles
VBSet Files = object.Files As DataObjectFiles
C#.NETDataObjectFiles Files = object.Files;
VC++IVDMDataObjectFiles* Files = object->Files;
IVDMDataObjectFiles* Files = object->GetFiles();
CHRESULT object->get_Files(struct IVDMDataObjectFiles** Files);

object

A DataObject object.

Files

Returns a collection of filenames used by the sftCFFiles format.

Comments

The Files property returns a collection of filenames used by the sftCFFiles format.

The Files collection is filled with file names only when the DataObject object contains data of type sftCFFiles. The DataObject object can contain several different types of data. You can iterate through the Item property to retrieve the list of file names.

The Files collection can be filled to allow an application to act as a drag source for a list of files (similar to Windows Explorer).

Examples

VB.NET

    AxSftMask1.Mask = ""
    AxSftMask1.MaxLength = 300
    AxSftMask1.PromptUnderline = False
    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

VB6

    SftMask1.Mask = ""
    SftMask1.MaxLength = 300
    SftMask1.PromptUnderline = False
    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

C#

    axSftMask1.MaxLength = 300;
    axSftMask1.PromptUnderline = false;
    axSftMask1.OLEDropMode = SftMaskOLEDropModeConstants.OLEDropSftMaskManual;
}

private void axSftMask1_OLEDragDrop(object sender, AxSftMaskLib70._ISftMaskEvents_OLEDragDropEvent e)
{
    if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFFiles)) {
        if (e.data.Files.Count > 1)
            MessageBox.Show("Only one file at a time please.");
        else
            axSftMask1.Text = e.data.Files[1];
    }
}

private void axSftMask1_OLEDragOver(object sender, AxSftMaskLib70._ISftMaskEvents_OLEDragOverEvent e)

C++

    return TRUE;
}

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)

See Also DataObject Object | Object Hierarchy


Last Updated 08/13/2020 - (email)
© 2024 Softel vdm, Inc.