SftDirectory 3.5 - ActiveX File/Folder Control

SftDirectory.AutoExpandDragDrop Property

Defines whether folders are automatically expanded during drag & drop.

Syntax

Get

Put

object

A SftDirectory object.

Boolean

Defines whether folders are automatically expanded during drag & drop.

Comments

The AutoExpandDragDrop property defines whether folders are automatically expanded during drag & drop.

During a drag & drop operation, if the mouse cursor hovers over an expandable folder for an extended period of time, the folder can automatically be expanded based on the AutoExpandDragDrop property setting. This applies to drag & drop operations started by a SftDirectory control or any other data source. Once the drag & drop operation completes, the affected folders remain expanded.

The AutoExpandHover property defines whether folders are automatically expanded when the mouse hovers over a folder (outside of a drag & drop operation).

Examples

VB.NET

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    AxSftDirectory1.OLEDropMode = SftControlOLEDropModeConstants.OLEDropSftControlManual
    AxSftDirectory1.AutoExpandDragDrop = True
End Sub

Private Sub AxSftDirectory1_OLEDragDrop(ByVal sender As Object, ByVal e As AxSftDirectoryLib30._ISftDirectoryEvents_OLEDragDropEvent) Handles AxSftDirectory1.OLEDragDrop
    ' make sure the control doesn't perform its usual default handling of
    ' the files (copy/move, etc.)
    e.defaultHandling = False

    If e.data.GetFormat(SftOLEClipboardConstants.sftCFFiles) Then
        Dim I As Integer
        For I = 1 To e.data.Files.Count
            MessageBox.Show("""" & e.data.Files(I) & """ being dropped.")
            ' perform your own processing here
        Next

View Entire Sample Code

VB6

Private Sub Form_Load()
    SftDirectory1.OLEDropMode = OLEDropSftControlManual
    SftDirectory1.AutoExpandDragDrop = True
End Sub

Private Sub SftDirectory1_OLEDragDrop(Data As SftDirectoryLib30.DataObject, _
        Folder As SftDirectoryLib30.ISftDirectoryFolder, Effect As Long, _
        Button As Integer, Shift As Integer, x As Single, y As Single, _
        DefaultHandling As Boolean)
    If Data.GetFormat(sftCFFiles) Then
        For i = 1 To Data.Files.Count
            MsgBox ("""" & Data.Files.Item(i) & """ being dropped.")
            ' perform your own processing here
        Next
    Else
        ' some other format

View Entire Sample Code

C#

private void Form1_Load(object sender, System.EventArgs e)
{
    axSftDirectory1.OLEDropMode = SftControlOLEDropModeConstants.OLEDropSftControlManual;
    axSftDirectory1.AutoExpandDragDrop = true;
}

private void axSftDirectory1_OLEDragDrop(object sender, AxSftDirectoryLib30._ISftDirectoryEvents_OLEDragDropEvent e)
{
    // make sure the control doesn't perform its usual default handling of
    // the files (copy/move, etc.)
    e.defaultHandling = false;

    if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFFiles)) {
        for (int i = 0 ; i < e.data.Files.Count ; ++i) {
            MessageBox.Show("\"" + e.data.Files[i+1] + "\" being dropped.");
            // perform your own processing here

View Entire Sample Code

C++

    CDialog::OnInitDialog();

    SetIcon(m_hIcon, TRUE);            // Set big icon
    SetIcon(m_hIcon, FALSE);        // Set small icon

    m_vDir1 = m_Dir1.GetControlUnknown();

    m_vDir1->OLEDropMode = OLEDropSftControlManual;
    m_vDir1->AutoExpandDragDrop = VARIANT_TRUE;
    return TRUE;
}

void COLEDragDlg::OnOLEDragDropSftDirectory1(LPDISPATCH FAR* Data, LPDISPATCH FAR* Folder, long FAR* Effect, short FAR* Button, short FAR* Shift, float FAR* x, float FAR* y, BOOL FAR* DefaultHandling)
{
    IVDMDataObjectPtr pData(*Data);
    ISftDirectoryFolderPtr pFolder(*Folder);

View Entire Sample Code

See Also SftDirectory Object | Object Hierarchy