Simão
Microsoft Student Partner

Basicamente este pedaço de código faz o seguinte:

Quando se clica com o botão direito do rato em cima da TreeView no Nó "Doc. Excel" abre o ContextMenuStrip1 , e no Nó "Doc. Word" abre o ContextMenuStrip2.

Tem outro pormenor na linha 4 "TreeView1.SelectedNode = TreeView1.GetNodeAt(e.Location)" que é o seguinte: Normalmente quando se clica com o botão direito do rato num nó da TreeView o "focus" vai sempre para o Nó que foi clicado anteriormente, e desta forma no nó que se clica fica o "focus".

 

Private

Sub TreeView1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TreeView1.MouseDown

     If e.Button = Windows.Forms.MouseButtons.Right Then

          'Coloca o focus no Node que foi clicado com o Botão Direito do Rato

          TreeView1.SelectedNode = TreeView1.GetNodeAt(e.Location)

          If TreeView1.GetNodeAt(e.Location).Text = "Doc. Excel" Then

               ContextMenuStrip1.Show(TreeView1,

New Point(e.X, e.Y))

          ElseIf TreeView1.GetNodeAt(e.Location).Text = "Doc. Word" Then

               ContextMenuStrip2.Show(TreeView1,

New Point(e.X, e.Y))

          End If

     End If

End Sub
posted on Friday, June 30, 2006 5:05 AM
Comments
Title  
Name  
Url
Box Code
Protected by FormShield
Comments