Use the ScrollButtonClick event to notify your application that the user clicks a button in the control's scrollbar. The ScrollButtonClick event is fired when the user clicks and releases the mouse over an enabled part of the scroll bar. Use the ScrollBars property to specify the visible scrollbars in the control. Use the ScrollPartVisible property to add or remove buttons/parts in the control's scrollbar. Use the ScrollPartEnable property to specify enable or disable parts in the control's scrollbar. Use the ScrolPartCaption property to specify the caption of the scroll's part. Use the OffsetChanged event to notify your application that the scroll position is changed. Use the OversizeChanged event to notify your application whether the range for a specified scroll bar is changed. Use the ScrollPos property to specify the position for the control's scroll bar. Use the Background property to change the visual appearance for any part in the control's scroll bar.

The following VB sample displays the identifier of the scroll's button being clicked:

With Tree1
    .BeginUpdate
        .ScrollBars = exDisableBoth
        .ScrollPartVisible(exVScroll, exLeftB1Part Or exRightB1Part) = True
        .ScrollPartCaption(exVScroll, exLeftB1Part) = "<img></img>1"
        .ScrollPartCaption(exVScroll, exRightB1Part) = "<img></img>2"
    .EndUpdate
End With

Private Sub Tree1_ScrollButtonClick(ByVal ScrollPart As EXTREELibCtl.ScrollPartEnum)
    MsgBox (ScrollPart)
End Sub

The following VB.NET sample displays the identifier of the scroll's button being clicked:

With AxTree1
    .BeginUpdate()
    .ScrollBars = EXTREELib.ScrollBarsEnum.exDisableBoth
    .set_ScrollPartVisible(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exLeftB1Part Or EXTREELib.ScrollPartEnum.exRightB1Part, True)
    .set_ScrollPartCaption(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exLeftB1Part, "<img></img>1")
    .set_ScrollPartCaption(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exRightB1Part, "<img></img>2")
    .EndUpdate()
End With

Private Sub AxTree1_ScrollButtonClick(ByVal sender As System.Object, ByVal e As AxEXTREELib._ITreeEvents_ScrollButtonClickEvent) Handles AxTree1.ScrollButtonClick
        MessageBox.Show( e.scrollPart.ToString())
End Sub

The following C# sample displays the identifier of the scroll's button being clicked:

axTree1.BeginUpdate();
axTree1.ScrollBars = EXTREELib.ScrollBarsEnum.exDisableBoth;
axTree1.set_ScrollPartVisible(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exLeftB1Part | EXTREELib.ScrollPartEnum.exRightB1Part, true);
axTree1.set_ScrollPartCaption(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exLeftB1Part , "<img></img>1");
axTree1.set_ScrollPartCaption(EXTREELib.ScrollBarEnum.exVScroll, EXTREELib.ScrollPartEnum.exRightB1Part, "<img></img>2");
axTree1.EndUpdate();

private void axTree1_ScrollButtonClick(object sender, AxEXTREELib._ITreeEvents_ScrollButtonClickEvent e)
{
    MessageBox.Show(e.scrollPart.ToString());
}

The following C++ sample displays the identifier of the scroll's button being clicked:

m_tree.BeginUpdate();
m_tree.SetScrollBars( 15 /*exDisableBoth*/ );
m_tree.SetScrollPartVisible( 0 /*exVScroll*/, 32768  /*exLeftB1Part*/ | 32 /*exRightB1Part*/, TRUE );
m_tree.SetScrollPartCaption( 0 /*exVScroll*/, 32768  /*exLeftB1Part*/ , _T("<img></img>1") );
m_tree.SetScrollPartCaption( 0 /*exVScroll*/, 32 /*exRightB1Part*/ , _T("<img></img>2") );
m_tree.EndUpdate();

void OnScrollButtonClickTree1(long ScrollPart) 
{
	CString strFormat;
	strFormat.Format( _T("%i"), ScrollPart );
	MessageBox( strFormat );
}

The following VFP sample displays the identifier of the scroll's button being clicked:

With thisform.Tree1
    .BeginUpdate
        .ScrollBars = 15
        .ScrollPartVisible(0, bitor(32768,32)) = .t.
        .ScrollPartCaption(0,32768) = "<img></img>1"
        .ScrollPartCaption(0, 32) = "<img></img>2"
    .EndUpdate
EndWith

*** ActiveX Control Event ***
LPARAMETERS scrollpart

wait window nowait ltrim(str(scrollpart))

---

Send comments on this topic.

© 1999-2008 Exontrol Inc, Software. All rights reserved.