Hide

SftDirectory 3.5 - ActiveX File/Folder Control

Display
Print

SftDirectoryColumn.Contents Property

Defines the contents for all cells in this column.

Syntax

Get

VB.NETType = object.Contents As SftDirectoryContentsConstants
VBType = object.Contents As SftDirectoryContentsConstants
C#.NETSftDirectoryContentsConstants Type = object.Contents;
VC++enum SftDirectoryContentsConstants Type = object->Contents;
enum SftDirectoryContentsConstants Type = object->GetContents();
CHRESULT object->get_Contents(enum SftDirectoryContentsConstants* Type);

Put

VB.NETobject.Contents = Type As SftDirectoryContentsConstants
VBobject.Contents = Type As SftDirectoryContentsConstants
C#.NETSftDirectoryContentsConstants object.Contents = Type;
VC++enum SftDirectoryContentsConstants object->Contents = Type;
void object->PutContents(enum SftDirectoryContentsConstants Type);
CHRESULT object->put_Contents(enum SftDirectoryContentsConstants Type);

object

A SftDirectoryColumn object.

Type

Defines the contents for all cells in this column.

TypeValueDescription
contentsSftDirectoryName0Name - The folder name.
contentsSftDirectorySize1Size - The folder size, generally in KB (Kilo Bytes) or MB (Mega Bytes), if available.
contentsSftDirectoryType2Type - The folder type. The type string is provided by the Windows Shell or Shell extensions, if available.
contentsSftDirectoryDateMod3Date Modified - The folder's last modification date, if available.
contentsSftDirectoryDateCre4Date Created - The folder's creation date, if available.
contentsSftDirectoryDateAcc5Date Accessed - The folder's last access date, if available.
contentsSftDirectoryAttributes6Attributes - The folder's attributes, if available. A = ready to archive, H = hidden folder, C = compressed, E = encrypted.
contentsSftDirectoryUser151User defined 1 - 9. User-defined contents, which are added for each folder using the UserContents event. The UserContents event occurs every time a folder is added so application-specific contents can be added.
contentsSftDirectoryUser252User defined 2.
contentsSftDirectoryUser353User defined 3.
contentsSftDirectoryUser454User defined 4.
contentsSftDirectoryUser555User defined 5.
contentsSftDirectoryUser656User defined 6.
contentsSftDirectoryUser757User defined 7.
contentsSftDirectoryUser858User defined 8.
contentsSftDirectoryUser959User defined 9.

Comments

The Contents property defines the contents for all cells in this column.

The Contents property determines the type of data displayed and loaded into the column. When using the Contents property at run-time, the contents must be refreshed using the Reload method (automatic at design-time only).

Examples

VB.NET

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    AxSftDirectory1.ColumnCount = 2
    AxSftDirectory1.ShowFiles = False
    AxSftDirectory1.GridStyle = SftDirectoryGridStyleConstants.gridSftDirectoryBoth
    AxSftDirectory1.Headers.Style = SftDirectoryHeadersStyleConstants.headersSftDirectoryButton
    AxSftDirectory1.get_ColumnEntry(0).HeaderText = "Folder"
    AxSftDirectory1.get_ColumnEntry(1).HeaderText = "Full Path"
    AxSftDirectory1.get_ColumnEntry(1).Contents = SftDirectoryContentsConstants.contentsSftDirectoryUser1
    AxSftDirectory1.Reload(False, False)
End Sub

Private Sub AxSftDirectory1_UserContents(ByVal sender As Object, ByVal e As AxSftDirectoryLib30._ISftDirectoryEvents_UserContentsEvent) Handles AxSftDirectory1.UserContents
    If e.contents = SftDirectoryContentsConstants.contentsSftDirectoryUser1 Then
        e.userString = e.folder.Path
    End If
End Sub

VB6

Private Sub Form_Load()
    SftDirectory1.ColumnCount = 2
    SftDirectory1.ShowFiles = False
    SftDirectory1.GridStyle = gridSftDirectoryBoth
    SftDirectory1.Headers.Style = headersSftDirectoryButton
    SftDirectory1.ColumnEntry(0).HeaderText = "Folder"
    SftDirectory1.ColumnEntry(1).HeaderText = "Full Path"
    SftDirectory1.ColumnEntry(1).Contents = contentsSftDirectoryUser1
    SftDirectory1.Reload False, False
End Sub

Private Sub SftDirectory1_UserContents(ByVal Folder As SftDirectoryLib30.ISftDirectoryFolder, ByVal Contents As SftDirectoryLib30.SftDirectoryContentsConstants, UserString As String)
    If Contents = contentsSftDirectoryUser1 Then
        UserString = Folder.Path
    End If
End Sub

C#

private void Form1_Load(object sender, System.EventArgs e)
{
    axSftDirectory1.ColumnCount = 2;
    axSftDirectory1.ShowFiles = false;
    axSftDirectory1.GridStyle = SftDirectoryGridStyleConstants.gridSftDirectoryBoth;
    axSftDirectory1.Headers.Style = SftDirectoryHeadersStyleConstants.headersSftDirectoryButton;
    axSftDirectory1.get_ColumnEntry(0).HeaderText = "Folder";
    axSftDirectory1.get_ColumnEntry(1).HeaderText = "Full Path";
    axSftDirectory1.get_ColumnEntry(1).Contents = SftDirectoryContentsConstants.contentsSftDirectoryUser1;
    axSftDirectory1.Reload(false, false);
}

private void axSftDirectory1_UserContents(object sender, AxSftDirectoryLib30._ISftDirectoryEvents_UserContentsEvent e)
{
    if (e.contents == SftDirectoryContentsConstants.contentsSftDirectoryUser1) {
        e.userString = e.folder.Path;

C++

    m_vDir1 = m_Dir1.GetControlUnknown();

    m_vDir1->ColumnCount = 2;
    m_vDir1->ShowFiles = VARIANT_FALSE;
    m_vDir1->GridStyle = gridSftDirectoryBoth;
    m_vDir1->Headers->Style = headersSftDirectoryButton;
    m_vDir1->ColumnEntry[0]->HeaderText = _T("Folder");
    m_vDir1->ColumnEntry[1]->HeaderText = _T("Full Path");
    m_vDir1->ColumnEntry[1]->Contents = contentsSftDirectoryUser1;
    m_vDir1->Reload(VARIANT_FALSE, VARIANT_FALSE);

    return TRUE;  // return TRUE  unless you set the focus to a control
}

void CUserContentsDlg::OnUserContentsSftDirectory1(LPDISPATCH Folder, long Contents, BSTR FAR* UserString)
{

See Also SftDirectoryColumn Object | Object Hierarchy


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