Using SftTree/OCX with Visual Basic 6
|
|
|
|
|
|
Using SftTree/OCX with Visual Basic 6 |
Adding SftTree/OCX To A Project
The SftTree/OCX control must be added to the Toolbox before it can be used in a project. The Toolbox normally displays the standard Visual Basic controls and any other ActiveX controls that have been added previously.
The control is added to the Toolbox using the Project, Components... menu command, which displays the following dialog:
Select the control "SftTree/OCX 7.0 Tree Control" by placing a check mark next to it and click OK. Make sure to select "SftTree/OCX 7.0 Tree Control" and not the control named "SftTree/OCX 7.0 Tree Control (IE)" as that control is specific to Internet Explorer and HTML pages.
This adds the control to the Toolbox. If you don't see the control in the list, make sure Selected Items Only is not checked. Once you click Apply or OK and an error message is displayed, the product SftTree/OCX is not correctly installed or the control may have been unregistered accidentally. Quit Visual Basic and use the entry Maintenance, Register SftTree OCX in Windows Registry in the SftTree OCX 7.0 program group to register the control. Restart Visual Basic and try to add the control to the Toolbox again.
for
use with Visual Basic (and other development
tools)
or
for
use with Internet Explorer and
other development tools (do not use with Visual Basic)
Now the control can be added to a form by clicking on the SftTree/OCX button of the Toolbox.
All required steps have now been completed to use SftTree/OCX.
Add the following sample code to initialize the control:
Private Sub Form_Load()
Dim ItemIndex As Long
With SftTree1
ItemIndex = .Items.Add("Item 1")
ItemIndex = .Items.Add("Item 2")
.Item(ItemIndex).Level = 1
ItemIndex = .Items.Add("Item 3")
End With
End Sub
In this example, the control is initialized at run-time using code. Of course it is also possible (and much easier) to set up all properties using the property pages. You can access the property pages by right-clicking on the control and select the Properties... entry of the popup menu.
You can run the sample application and it displays a SftTree/OCX control with three items.
After adding the control to the form, right click on the control and select the Properties... entry of the popup menu. This displays the Property Dialog for the control.
Please note that you can right-click on a property in a Property Dialog or double-click on the description of a property to access its complete help information.
This control has many properties and methods which you can use. This is a very simple example and doesn't even begin to exploit the capabilities of this control. Please take a moment to familiarize yourself with the objects offered by the SftTree/OCX control. Each object represents a specific area of the control and can be fully customized. Also make sure to run the demo which is included with this product and take a look at the included samples.
The valid range for a color value is 0 to 16,777,215 (&HFFFFFF). The high order byte of a number in this range equals 0; the lower 3 bytes, from least to most significant byte, determine the amount of red, green, and blue, respectively. The red, green, and blue components are each represented by a number between 0 and 255 (&HFF). If the high byte is not 0, the system colors as defined in Control Panel's settings are used. The Windows API GetSysColor defines all valid constants. Please see your development environment's documentation for applicable color constants.
SftTree1.Items.BackColor = vbHighlight SftTree1.Items.BackColor = vbRed SftTree1.Items.BackColor = &HFF ' red
Dim c As Long c = SftTree1.Items.BackColor