المشاركات : 207
المواضيع 48
الإنتساب : Jan 2014
السمعة :
0
الشكر: 0
تم شكره 68 مرات في 17 مشاركات
السلام عليكم
لدي برنامج به تري فيو وليست فيو وأريد كود بحيث عند الضغط علي عنصر بالتري فيو تظهر Nodes الخاصة به في الليست فيو استخدمت هذا الكود لكني فشلت فأرجو التعديل علي هذا الكودولكم مني جزيل الشكر
ListView1.listItems.Add=TreeView1.SelectedItem.Node
المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
إذا كنت تريد إظهار العقد الفرعية (Child Nodes) التابعة للعقدة التي يتم النقر عليها فاستعمل الكود التالي في الحدث NodeClick للـ TreeView:
كود :
Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
Dim NextChild As Node
ListView1.ListItems.Clear
If Node.Children > 0 Then
Set NextChild = Node.Child
Do While Not (NextChild Is Nothing)
ListView1.ListItems.Add , , NextChild.Text
Set NextChild = NextChild.Next
Loop
End If
End Sub
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
المشاركات : 207
المواضيع 48
الإنتساب : Jan 2014
السمعة :
0
الشكر: 0
تم شكره 68 مرات في 17 مشاركات
جزاك الله كل خير أخي الكريم