منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

سنقوم بشرح كيفية استخدام أداة ColorDialog مع تلميحات عليها


================


نقوم بفتح مشروع جديد ونضع عليه زر امر Button وندرج أداة ColorDialog من صندوق الأداوات ToolBox


فى حدث Click لزر الأمر نضع هذا الكود :

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Me.BackColor = ColorDialog1.Color
End If
End Sub

قمنا باظهار صندوق حوار الألوان عن طريق جملة الشرط
والحصول على نتيجة شاشة الحوار - بحيث لو كان موافق يقوم البرنامج بتغيير لون خلفية الفورم









الكائن ColorDialog موجود بصندوق الأدوات


أدرجه فى الفورم

أضف زر أمر Button

ضع هذا الكود فى زر الأمر

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Me.BackColor = ColorDialog1.Color
End If

End Sub

أعتقد المثال واضح وسهل

مثل السابق لكن أوقفنا امكانية تكوين لون

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

' هنا نوقف الامكانيات

ColorDialog1.AllowFullOpen = False


If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Me.BackColor = ColorDialog1.Color
End If
End Sub

مرفق ملف عبارة عن مثال على الكود السابق



صفحة الكائن فى مكتبة مايكروسوفت

http://msdn2.microsoft.com/en-us/lib...og(VS.90).aspx