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

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



سؤالين في صناعة الادوات الادوات - ali.alfoly - 20-11-13

السلام عليكم ورحمة الله

السؤال الاول : كيف احذف خاصية من خصائص الاداة

السؤال الثاني : كيف اخلي قيمة افتراضية للخصائص مثال انظر الصورة





RE: سؤالين في صناعة الادوات الادوات - 3booody - 20-11-13

استدعي مجال الاسماء
Imports System.ComponentModel

والخاصية التي تريد الغائها اعمل اول شي اعادة قيادة Overrides لتظهر عندك ثم ضع مثل الكود التالي وهو اداة TextBox

كود :
Inherits TextBox
    <Browsable(False), EditorBrowsable(EditorBrowsableState.Never)> _
    Public Overrides Property Text As String
        Get
            Return MyBase.Text
        End Get
        Set(ByVal value As String)
            MyBase.Text = value
        End Set
    End Property

اما سؤالك الثاني فالكود التالي قبل الخاصية يجعل الزر Reset مفعل

كود :
<DefaultValue(True)> _



RE: سؤالين في صناعة الادوات الادوات - ali.alfoly - 20-11-13

جزاك الله خيرا اخي الكريم عبدودي
طيب ممكن اعرف حدرتك كيف عرفت ذلك يعني من اين حصلت علي هذه المعلومات
بحيث لما احتاج الي شئ اخر
وشكرا لك



RE: سؤالين في صناعة الادوات الادوات - ali.alfoly - 20-11-13

السلام عليكم
معلش في سؤال
الدالة
كود :
DefaultValue(True)
كيف امرر لها لون Color



RE: سؤالين في صناعة الادوات الادوات - 3booody - 20-11-13

اخي انا قرأت سابقآ في كتب عن المواصفات وطريقة استخدامها وايضآآ حفظت مواصفات معينه للخصائص مثل الي ذكرتها ,, صراحة لا اعرف اين يمكنك ان تجد شرح كامل عنها لان انا تعلمت قسم منها من كتاب الاستاذ تركي العسيري والباقي متفرقات من خلال تطبيقي وبحثي من النت
موفق


RE: سؤالين في صناعة الادوات الادوات - ali.alfoly - 20-11-13

جزاك الله خيرا اخي عبودي
طيب بالنسبة للدالة DefaultValue كيف امرر ليها لون او خط او شئ تاني


RE: سؤالين في صناعة الادوات الادوات - 3booody - 20-11-13

لا اعرف طريقة استرجاع لون بصراحة لكن النص والمتغيرات المنطقية ممكن

كود :
Inherits TextBox

    <System.ComponentModel.DefaultValue("3booody")> _
    Public Overrides Property Text As String
        Get
            Return MyBase.Text
        End Get
        Set(ByVal value As String)
            MyBase.Text = value
        End Set
    End Property



RE: سؤالين في صناعة الادوات الادوات - ali.alfoly - 20-11-13

وفي مشكلة اخري في نفس الدالة
انها تقبل النص مباشرتا لاكن لا تقبل متغير نصي


RE: سؤالين في صناعة الادوات الادوات - الشاكي لله - 20-11-13

مارأيك بهذه الحركة

PHP كود :
<System.ComponentModel.DefaultValue(GetType(Color), "Red")> _
Public Overrides Property BackColor() As Color
    Get
        
Return MyBase.BackColor
    End Get
    Set
        MyBase
.BackColor value
    End Set
End Property