02-02-15, 06:35 AM (آخر تعديل لهذه المشاركة : 02-02-15, 06:36 AM {2} بواسطة البراء.)
بسم الله الرحمن الرحيم
الاخوة الافاضل لا احب ان اثقل عليكم ما قصدت عن صلاحيات المستخدمين على شكل شجرة لا اريد كيف عمل الصلاحيات وربطها في البرنامج واستدعائها من قاعدة البيانات لا اريد هذا كله الموضوع بسيط ان شاء الله هو كيف اجعل اسم الشاشة كـ أب والادوات بداخليها كـ بناء لتوضيح اكثر يوجد مرفق
بسم الله الرحمن الرحيم
احبابي في المنتدى ما اريده هو كيف يمكن عمل شجرة الصلاحيات كما هي مرفقة في المشاركة السابقة هل هذه الشجرة مستخدم بها dadagridview أو treeview أو listview وكيف يمكن عمل التفرعات
(02-02-15, 10:54 AM)البراء كتب : بسم الله الرحمن الرحيم
احبابي في المنتدى ما اريده هو كيف يمكن عمل شجرة الصلاحيات كما هي مرفقة في المشاركة السابقة هل هذه الشجرة مستخدم بها dadagridview أو treeview أو listview وكيف يمكن عمل التفرعات
هل هذه الشجرة مستخدم بها dadagridview أو treeview أو listview وكيف يمكن عمل التفرعات
السلام عليكم
ما أحد رد عليك خالص ...؟
طيب :
مع أني مشغول كثير , لكن أنا رايح اساعدك لسببين :
1 أنا أبن البلد مثلك
2 الصمت الرهيب في المنتدى
هو الموضوع مش سهل .... وما ينفعش احلها لك هنا بالكود لانه في كثير أسئلة لازم تجاوب عليها
بتلاقي عنواني في التوقيع بتاعى .... تعال وبصير خير
Public Function FindAllChildren(ByRef StartingContainer As System.Windows.Forms.Form)
As List(Of System.Windows.Forms.Control)
Dim Children As New List(Of System.Windows.Forms.Control)
Dim oControl As System.Windows.Forms.Control
For Each oControl In StartingContainer.Controls
Children.Add(oControl)
If oControl.HasChildren Then
Children.AddRange(oControl.FindAllChildren())
End If
Next
Return Children
End Function
هذه الدالة لجلب كل الادوات الفي الفورم لكن في ادوات داخل الفوم لها ادوات اخرى مثل groupbox
لذلك محتاجين دالة ثانية تابع معي
كود :
Public Function FindAllChildren(ByRef StartingContainer As System.Windows.Forms.Control)
As List(Of System.Windows.Forms.Control)
Dim Children As New List(Of System.Windows.Forms.Control)
If StartingContainer.HasChildren = False Then
Return Nothing
Else
Dim oControl As System.Windows.Forms.Control
For Each oControl In StartingContainer.Controls
Children.Add(oControl)
If oControl.HasChildren Then
Children.AddRange(oControl.FindAllChildren())
End If
Next
End If
Return Children
End Function
هذه كل القصة لجلب القائمة او غيره ممكن تستخدم الداله الثانية
والامور طيبة ^_^
microsoft partner Team administrator MCPD,MCITP,OCP,MP,MCC Xprema Systems