منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] سؤال في اداة flowlaypanel - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] سؤال في اداة flowlaypanel (/showthread.php?tid=37096)



سؤال في اداة flowlaypanel - عبدالكريم رشدان - 02-12-20

السلام عليكم جميعا 

انا لدي عدد 2 من flowlaypanel وكل اداة بها ادوات button .

واريد عندما اختار button من flowlaypanel الاولي يتغير لون button وفي الحالة هذه استخدمت جدث Gotfocue والعملية نجحت 
ولكن عندما اختار button من flowlaypanel الثانية يتغير لون button في flowlaypanel الاولي 
وانا اريد ان يبقي اللون كما اختر اللون



ملاحة الفورم الثالث والرابع .... هما لبفكرة التي اريدها

ومشكورين


RE: سؤال في اداة flowlaypanel - Anas Mahmoud - 04-12-20

امسح كامل الكود في الفورم وضع التالي : 

كود :
Public Class Form1
   Sub New()

       ' This call is required by the designer.
       InitializeComponent()

       ' Add any initialization after the InitializeComponent() call.
       For Each flp As FlowLayoutPanel In {FlowLayoutPanel1, FlowLayoutPanel2}
           For Each btn In flp.Controls.OfType(Of Button)
               AddHandler btn.Click, AddressOf btn_Click
           Next
       Next
   End Sub

   Private Sub btn_Click(sender As Object, e As EventArgs)
       Dim btn As Button = sender
       Dim buttons = btn.Parent.Controls.OfType(Of Button)
       For Each b In buttons
           b.BackColor = Color.White
       Next
       btn.BackColor = Color.Yellow
   End Sub


End Class
ملاحظة هذا القسم مخصص لاسئلة ال c# ولكني وجدت المشروع VB فكتبت الكود VB
ان كنت تريده بلغة c# اخبرني والا فارجو نقل الموضوع من المشرف


RE: سؤال في اداة flowlaypanel - عبدالكريم رشدان - 04-12-20

(02-12-20, 06:16 PM)عبدالكريم رشدان كتب : السلام عليكم جميعا 

انا لدي عدد 2 من flowlaypanel وكل اداة بها ادوات button .

واريد عندما اختار button من flowlaypanel الاولي يتغير لون button وفي الحالة هذه استخدمت جدث Gotfocue والعملية نجحت 
ولكن عندما اختار button من flowlaypanel الثانية يتغير لون button في flowlaypanel الاولي 
وانا اريد ان يبقي اللون كما اختر اللون



ملاحة الفورم الثالث والرابع .... هما لبفكرة التي اريدها

ومشكورين

(04-12-20, 11:27 AM)Anas Mahmoud كتب : امسح كامل الكود في الفورم وضع التالي : 

كود :
Public Class Form1
   Sub New()

       ' This call is required by the designer.
       InitializeComponent()

       ' Add any initialization after the InitializeComponent() call.
       For Each flp As FlowLayoutPanel In {FlowLayoutPanel1, FlowLayoutPanel2}
           For Each btn In flp.Controls.OfType(Of Button)
               AddHandler btn.Click, AddressOf btn_Click
           Next
       Next
   End Sub

   Private Sub btn_Click(sender As Object, e As EventArgs)
       Dim btn As Button = sender
       Dim buttons = btn.Parent.Controls.OfType(Of Button)
       For Each b In buttons
           b.BackColor = Color.White
       Next
       btn.BackColor = Color.Yellow
   End Sub


End Class
ملاحظة هذا القسم مخصص لاسئلة ال c# ولكني وجدت المشروع VB فكتبت الكود VB
ان كنت تريده بلغة c# اخبرني والا فارجو نقل الموضوع من المشرف

بارك الله فيك

(04-12-20, 12:51 PM)عبدالكريم رشدان كتب :
(02-12-20, 06:16 PM)عبدالكريم رشدان كتب : السلام عليكم جميعا 

انا لدي عدد 2 من flowlaypanel وكل اداة بها ادوات button .

واريد عندما اختار button من flowlaypanel الاولي يتغير لون button وفي الحالة هذه استخدمت جدث Gotfocue والعملية نجحت 
ولكن عندما اختار button من flowlaypanel الثانية يتغير لون button في flowlaypanel الاولي 
وانا اريد ان يبقي اللون كما اختر اللون



ملاحة الفورم الثالث والرابع .... هما لبفكرة التي اريدها

ومشكورين

(04-12-20, 11:27 AM)Anas Mahmoud كتب : امسح كامل الكود في الفورم وضع التالي : 

كود :
Public Class Form1
   Sub New()

       ' This call is required by the designer.
       InitializeComponent()

       ' Add any initialization after the InitializeComponent() call.
       For Each flp As FlowLayoutPanel In {FlowLayoutPanel1, FlowLayoutPanel2}
           For Each btn In flp.Controls.OfType(Of Button)
               AddHandler btn.Click, AddressOf btn_Click
           Next
       Next
   End Sub

   Private Sub btn_Click(sender As Object, e As EventArgs)
       Dim btn As Button = sender
       Dim buttons = btn.Parent.Controls.OfType(Of Button)
       For Each b In buttons
           b.BackColor = Color.White
       Next
       btn.BackColor = Color.Yellow
   End Sub


End Class
ملاحظة هذا القسم مخصص لاسئلة ال c# ولكني وجدت المشروع VB فكتبت الكود VB
ان كنت تريده بلغة c# اخبرني والا فارجو نقل الموضوع من المشرف

بارك الله فيك....
لو في حالة قمت بتبديل buttons ب user controls هل استخدم نفس الكود



RE: سؤال في اداة flowlaypanel - Anas Mahmoud - 04-12-20

على حسب ما تريد فعله وعلى حسب تركيب ال user control هذه