| Forum: VB.NET |
Thema:
Re: Problem mit TreeView in VB.Net |
Von:
paul meier (
26.07.2005 18:42) |
ich hab da schon etwas zusammengebaut, so:Public Class Artikeltvw
Public A_AID As Integer 'Ersatz für Tag
Public A_PID As Integer
Public A_Bereich As String
Public A_Ebene As Integer
Public A_Bez As String
Public A_Menge As Integer
Public A_VPE As Integer
Public A_EK As Double
Public A_VK As Double
Public Sub New(ByVal A_AID As Int32, ByVal A_PID As Int32, ByVal A_Bereich As String, _
ByVal A_Ebene As Int32, ByVal A_Bez As String, ByVal A_Menge As Integer, _
ByVal A_VPE As Integer, ByVal A_EK As Double, ByVal A_VK As Double)
Me.A_AID = A_AID
Me.A_PID = A_PID
Me.A_Bereich = A_Bereich
Me.A_Ebene = A_Ebene
Me.A_Bez = A_Bez
Me.A_Menge = A_Menge
Me.A_VPE = A_VPE
Me.A_EK = A_EK
Me.A_VK = A_VK
End Sub
End Class
Public Class Artikel_Treenode : Inherits TreeNode
Public ArtikelInformationen As Artikeltvw
Public Sub New(ByVal Text As String, ByVal ArtikelInformationen As Artikeltvw)
MyBase.New()
MyBase.Text = Text
Me.ArtikelInformationen = ArtikelInformationen
End Sub
End Class
Public Class tvwfill
Public Sub filltvw()
For Each dr As DataRow In ds_A1.Tables("Artikel1").Rows
aid = dr(0).ToString
pid = dr(1)
bereich = dr(2)
ebene = dr(3)
bezeichnung = dr(4).ToString
A_EK = dr(7)
A_VK = dr(8)
If pid = 0 Then
art_node = New Artikel_Treenode(dr.Item(0), New Artikeltvw(A_AID, A_PID, A_Bereich, A_Ebene, A_Bez, A_Menge, A_VPE, A_EK, A_VK))
artid = art_node.Text
art_node1 = New Artikel_Treenode(dr.Item(4), New Artikeltvw(A_AID, A_PID, A_Bereich, A_Ebene, A_Bez, A_Menge, A_VPE, A_EK, A_VK))
artstr = art_node1.Text
Form1.InstForm1.tvw.Nodes.Add(artstr)
End If
Next
End Sub
Mein Problem ist die Übergabe an ein TreeView.Tag.Objekt u.danach das auslesen daraus bei TreeView_AfterSelect
Danke im Voraus!
Gruß paul!
www.firmsoftware.de
| Betreff |
Von |
Datum |
|
|
  |
Re: Problem mit TreeView in VB.Net
| Hallo Paul,<br><br>ich bin leider VB.net entwickler aber in C# wäre die Syntax wiefolgt:<br><br>im Event Body<br>Artikel_Treenode artikel_Treenode;<br>if(e.Node is Artikel_Treenode)<br>{<br>// type... |
|
|
|
|
|
Ansgar
Sommer
|
26.07.2005 21:00 |
|
|
|
Re: Problem mit TreeView in VB.Net
| hi Ansgar,<br>Ich hab jetzt nur noch de Klassen filltvw u.Artikel_Treenode. Da ist aber immer noch ein Fehler, der Code:<br>Public Class Artikel_Treenode : Inherits TreeNode<br> Private A_AID As Int32... |
|
|
|
|
|
paul
meier
|
29.07.2005 07:49 |
|
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
