

| Type | Description | |||
| Boolean | A boolean expression that indicates whether the control expands or collapses a node when user presses arrow keys. |
The following VB sample expands or collapses the focused item if the user presses the + or - keys on the numeric keypad, and ExpandOnKeys property is False:
Private Sub Tree1_KeyDown(KeyCode As Integer, Shift As Integer)
With Tree1.Items
If (KeyCode = vbKeyAdd) Then
.ExpandItem(.FocusItem) = True
End If
If (KeyCode = vbKeySubtract) Then
.ExpandItem(.FocusItem) = False
End If
End With
End Sub
The following C++ sample expands or collapses the focused item if the user presses the + or - keys on the numeric keypad, and ExpandOnKeys property is False:
#include "Items.h"
void OnKeyDownTree1(short FAR* KeyCode, short Shift)
{
CItems items = m_tree.GetItems();
switch ( *KeyCode )
{
case VK_ADD:
case VK_SUBTRACT:
{
items.SetExpandItem( items.GetFocusItem(), *KeyCode == VK_ADD ? TRUE : FALSE );
break;
}
}
}
The following VB.NET sample expands or collapses the focused item if the user presses the + or - keys on the numeric keypad, and ExpandOnKeys property is False:
Private Sub AxTree1_KeyDownEvent(ByVal sender As Object, ByVal e As AxEXTREELib._ITreeEvents_KeyDownEvent) Handles AxTree1.KeyDownEvent
Select Case (e.keyCode)
Case Keys.Add
With AxTree1.Items
.ExpandItem(.FocusItem) = True
End With
Case Keys.Subtract
With AxTree1.Items
.ExpandItem(.FocusItem) = False
End With
End Select
End Sub
The following C# sample expands or collapses the focused item if the user presses the + or - keys on the numeric keypad, and ExpandOnKeys property is False:
private void axTree1_KeyDownEvent(object sender, AxEXTREELib._ITreeEvents_KeyDownEvent e)
{
if ( ( e.keyCode == Convert.ToInt16(Keys.Add) ) || (e.keyCode == Convert.ToInt16(Keys.Subtract) ) )
axTree1.Items.set_ExpandItem( axTree1.Items.FocusItem, e.keyCode == Convert.ToInt16(Keys.Add) );
}
The following VFP sample expands or collapses the focused item if the user presses the + or - keys on the numeric keypad, and ExpandOnKeys property is False:
*** ActiveX Control Event *** LPARAMETERS keycode, shift with thisform.Tree1.Items if ( keycode = 107 ) .DefaultItem = .FocusItem .ExpandItem(0) = .t. else if ( keycode = 109 ) .ExpandItem(0) = .f. endif endif endwith