fighters

    استخدام اداه ال Task panel

    شاطر
    avatar
    fighter
    الـمـديـرالـعـام
    الـمـديـرالـعـام

    عدد الرسائل : 226
    العمر : 29
    مزاجى :
    تاريخ التسجيل : 16/04/2008

    03 استخدام اداه ال Task panel

    مُساهمة من طرف fighter في الخميس مايو 01, 2008 6:19 pm




    الان كما استخدام اداه ال Task panel وهى اضافة ادوات اخرى الى الاداه



    من مميزات تلك الادوات(لا اعرف اذا كانت ميزة او عيب بالنسبة لكم ) انك تفعل كل شئ بها وقت ال Run time اى انها مرنة جدا

    احببت ان اقدم مثال خفيف ليس فيه الا مربع نص ليكون سهل عليكم فكان من المفروض ان نصمم نافذة البحث الخاصة بالاكسبلورر


    ناتى لكتابة الاكواد وتحليلها


    الكود:
    Dim Groub As TaskPanelGroup

    عمل تعريف كائن على الكلاس Taskpanelgroub ليتم التعامل مع المجموعات المختلف
    الكود:

    Dim Item As TaskPanelGroupItem

    وهنا للتعامل مع كائنات المجموعة

    الكود:
    Set Groub = TaskPanel1.Groups.Add(0, "Educating Simble")

    لاضافة المجموعة فى الاداه واعطائها الرقم التعريفى

    الكود:
    Set Item = .Add(2, "", xtpTaskItemTypeControl)
            Set Item.Control = Text1

    هذا هو الجذئ المهم عندنا موضوع اليوم

    بدل استخدام نوع الايتم لينك يتم تعريفه على انه xtpTaskItemTypeControl اى انك تقول للاداه ان ما سياتى عبارة عن اداه اخرى

    فى الجذئ الثانى من الكود

    الكود:
    Set Item.Control = Text1

    تنزيل الملف






    _________________

      الوقت/التاريخ الآن هو الجمعة أكتوبر 19, 2018 8:40 pm