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
Defines the image object using an OLE Picture object (IPictureDisp interface).
Get
Put
PutRef
object
pPictureDisp
Defines the image object using an OLE Picture object (IPictureDisp interface). For information about picture properties, please visit the applicable section "Using SftBox/OCX with ...".
The Picture property defines the image object using an OLE Picture object (IPictureDisp interface).
The SftPictureObject.Type property is set to sftTypeIDispatch. The SftPictureObject.ActualHeight and SftPictureObject.ActualWidth properties reflect the image size.
Dim itemIndex As Integer itemIndex = comboTarget.Items.Insert(e.data.GetData(SftOLEClipboardConstants.sftCFText), comboTarget.Items.DropIndex) comboTarget.Items.Selection = itemIndex End If If e.data.GetFormat(SftOLEClipboardConstants.sftCFBitmap) Then Dim itemIndex As Integer itemIndex = comboTarget.Items.Insert("A Bitmap", comboTarget.Items.DropIndex) Dim o As Object = e.data.GetData(SftOLEClipboardConstants.sftCFBitmap) comboTarget.get_Item(itemIndex).Image.Picture = o 'as stdole.IPictureDisp comboTarget.Items.Selection = itemIndex End If If e.data.GetFormat(SftOLEClipboardConstants.sftCFFiles) Then Dim itemIndex As Integer = -1 Dim toIndex As Integer = comboTarget.Items.DropIndex Dim s As String For Each s In e.data.Files
Private Sub ComboTarget_OLEDragDrop(Data As SftBoxLib50.DataObject, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single) Dim ItemIndex As Long If Data.GetFormat(sftCFText) Then ItemIndex = ComboTarget.Items.Insert(Data.GetData(sftCFText), ComboTarget.Items.DropIndex) ComboTarget.Items.Selection = ItemIndex End If If Data.GetFormat(sftCFDIB) Then ItemIndex = ComboTarget.Items.Insert("A Bitmap", ComboTarget.Items.DropIndex) Set ComboTarget.Item(ItemIndex).Image.Picture = Data.GetData(sftCFDIB) ComboTarget.Items.Selection = ItemIndex End If If Data.GetFormat(sftCFFiles) Then Dim vData As Variant, ToIndex As Long ToIndex = ComboTarget.Items.DropIndex For Each vData In Data.Files ItemIndex = ComboTarget.Items.Insert(vData, ToIndex)
{ if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFText)) { int itemIndex = comboTarget.Items.Insert(e.data.GetData(SftOLEClipboardConstants.sftCFText) as string, comboTarget.Items.DropIndex); comboTarget.Items.Selection = itemIndex; } if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFBitmap)) { int itemIndex = comboTarget.Items.Insert("A Bitmap", comboTarget.Items.DropIndex); object o = e.data.GetData(SftOLEClipboardConstants.sftCFBitmap); comboTarget.get_Item(itemIndex).Image.Picture = o as stdole.IPictureDisp; comboTarget.Items.Selection = itemIndex; } if (e.data.GetFormat((short) SftOLEClipboardConstants.sftCFFiles)) { int itemIndex = -1; int toIndex = comboTarget.Items.DropIndex; foreach (string s in e.data.Files) { itemIndex = comboTarget.Items.Insert(s, toIndex);
See Also SftPictureObject Object | Object Hierarchy