TreeView1.Nodes.Add(MyNode)

Me.Invoke(New addNodeFromThreadDelegate(AddressOf addNodeFromThread), New _
  Object() {MyNode})

Private Delegate Sub addNodeFromThreadDelegate(ByVal node As TreeNode)
 
Private Sub addNodeFromThread(ByVal node As TreeNode)
	TreeView1.Nodes.Add(node)
End Sub

Private Delegate Sub addNodeFromThreadDelegate(ByVal nodecoll As _
  TreeNodeCollection, _
ByVal node As TreeNode)
 
Private Sub addNodeFromThread(ByVal nodecoll As TreeNodeCollection, _
ByVal node As TreeNode)
	nodecoll.Add(node)
End Sub

Me.Invoke(New addNodeFromThreadDelegate(AddressOf addNodeFromThread), _
New Object() {NodeCollection}, New Object() {MyNode})

Zitat:

Die Überlandungsauflösung ist fehlgeschlagen,da keine zugreifbare "Invoke" diese Anzahl von Argumenten akzeptiert.

Web: http://www.vbtricks.de.vu/

VBTricks.de.vu. Meine Webseite zu VB und anderen Programmiersprachen. Verschiedene fortgeschrittene OCXe und komplette Projekte sind im Sourcecode verf?gbar.