URGENT: Treeview nodes in shortcutbar

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Using VB6 i created an app which uses a shortcutbar for a menu and a pane containing a treeview. Upgraded to Visual Studio 2005 and the treeview click is no longer working.
on the load event, the following is run.

tvwMenuItems.Nodes.Add("ID:" & CStr(FORMINDEX_COMM), "Communications", 0)
and the following is activated on the treeview click event:

Private Sub tvwMenuItems_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles tvwMenuItems.Click

Dim selectedItem As XtremeShortcutBar.ShortcutBarItem

selectedItem = frmSDIInterface.wndWindowView.FindItem(CInt(Mid(eventSender.SelectedNode.Name, InStr(eventSender.SelectedNode.Name, ":") + 1)))

frmSDIInterface.wndWindowView.Selected = selectedItem
End Sub

However, although it worked in the VB app, it no fails on the FindItem line.

Any help is appreciated.

Tony (Inpressmedia)

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
TThorne Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 14 March 2006 Location: United Kingdom Status: Offline Points: 4	Post Options Post Reply Quote TThorne Report Post Thanks(0) Quote Reply Topic: URGENT: Treeview nodes in shortcutbar Posted: 14 March 2006 at 2:43pm
	Using VB6 i created an app which uses a shortcutbar for a menu and a pane containing a treeview. Upgraded to Visual Studio 2005 and the treeview click is no longer working. on the load event, the following is run. tvwMenuItems.Nodes.Add("ID:" & CStr(FORMINDEX_COMM), "Communications", 0) and the following is activated on the treeview click event: Private Sub tvwMenuItems_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles tvwMenuItems.Click Dim selectedItem As XtremeShortcutBar.ShortcutBarItem selectedItem = frmSDIInterface.wndWindowView.FindItem(CInt(Mid(eventSender.SelectedNode.Name, InStr(eventSender.SelectedNode.Name, ":") + 1))) frmSDIInterface.wndWindowView.Selected = selectedItem End Sub However, although it worked in the VB app, it no fails on the FindItem line. Any help is appreciated. Tony (Inpressmedia)