تقييم الموضوع :
  • 2 أصوات - بمعدل 4.5
  • 1
  • 2
  • 3
  • 4
  • 5
[مقال] مين يصدق ان هذه ListBox
#1
السلام عليكم

صورة



الكود

كود :
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        With Me.ListBox1
            .DrawMode = DrawMode.OwnerDrawVariable
            .ItemHeight = 45
            .Font = New Font("Tahoma", 9)
            .SelectionMode = SelectionMode.MultiSimple
        End With
    End Sub

    Private Sub ListBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles ListBox1.DrawItem

        '- رسم مستطيل بلون الخلفية للرسم عليه للرسم عليه
        e.Graphics.FillRectangle(New System.Drawing.SolidBrush(Me.ListBox1.BackColor), e.Bounds)
        '- رسم المستطيل الملون
        e.Graphics.DrawRectangle(New Pen(Me.Get_Color_Bordr(e.BackColor), 1), e.Bounds.X + 2, e.Bounds.Y + 2, e.Bounds.Width - 5, e.Bounds.Height - 3)
        '- النص الاول
        e.Graphics.DrawString(ListBox1.Items(e.Index).ToString(), _
            e.Font, Brushes.Black, e.Bounds.X + 5, e.Bounds.Y + 7, StringFormat.GenericDefault)
        '- النص الثاني
        e.Graphics.DrawString(ListBox1.Items(e.Index).ToString(), _
          New Font(e.Font.Name, e.Font.Size - 1), Brushes.Gray, e.Bounds.X + 5, e.Bounds.Y + 24, StringFormat.GenericDefault)
        '- رسم ايقونة حالة التحديد
        e.Graphics.DrawImage(Me.Get_Img(e.BackColor), e.Bounds.X + e.Bounds.Width - 20, e.Bounds.Y + 7)

    End Sub

    Private Function Get_Img(clr As Color) As Image
        If clr <> SystemColors.Window Then Return My.Resources.Chck_Yes
        Return My.Resources.Chck_No
    End Function

    Private Function Get_Color_Bordr(clr As Color) As Color
        If clr <> SystemColors.Window Then Return clr
        Return SystemColors.Control
    End Function

End Class

ارجو الدعاء لي بانهاء مشروعي
او قولو كما تقول امي (ربنا ينولك ما انتا قاصد ) Wink
الرد }}}}
#2
بارك الله فيك
انا اتمنى اعرف ابني ادوات من الصفر واتمنى اعرف اخصص ما اقوم ببنائه
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم أخي علي,

مبدع كالعادة Smile
الله يوفقك و ينولك ما أنت قاصد Wink

بالمناسبة, لو أن كل عضو في المنتدى يقوم بتصميم أدوات كهذه, علينا نحن (العرب) جمعها و من ثم بيعها للطرف الأخر (الأجانب) من أجل الاستفادة منها.
أو هنالك موقع إسمه (github) و على كل عضو في المنتدى الإطلاع عليه فهو خاص بالمبرمجين.
و كذلك, عند تصميم الأداة يجب على العضو توضيح تأثير الأداة على أداء و سرعة البرنامج.

كانت هذه ملاحظات بسيطة من أخوكم الصغير Smile و أرجوا أن تكون مقبولة من قبلكم Smile


السلام عليكم
الرد }}}}
تم الشكر بواسطة: صبري زينوبي
#4
(08-04-14, 03:36 AM)سعود كتب : بارك الله فيك
انا اتمنى اعرف ابني ادوات من الصفر واتمنى اعرف اخصص ما اقوم ببنائه

والله اخي سعود انا لست محترف في ذلك
ولاكني لا انكر اني اعرف الكثير
ولا اعلم مصدر غني بالمعلومات في هذه الجزئية
وافتقدنا المصدر الرئيسي لذلك وهما الاخ ابو ايهاب والاخ عبد الغفور (سوريتي)
لا اعلم والله انا حزين جدا جدا الله المستعان واقول كما قال ابو يوسف (فَصَبْرٌ جَمِيلٌ وَاللّهُ الْمُسْتَعَانُ عَلَى مَا تَصِفُونَ)

(08-04-14, 09:54 AM)hoob computer كتب : السلام عليكم أخي علي,

مبدع كالعادة Smile
الله يوفقك و ينولك ما أنت قاصد Wink

بالمناسبة, لو أن كل عضو في المنتدى يقوم بتصميم أدوات كهذه, علينا نحن (العرب) جمعها و من ثم بيعها للطرف الأخر (الأجانب) من أجل الاستفادة منها.
أو هنالك موقع إسمه (github) و على كل عضو في المنتدى الإطلاع عليه فهو خاص بالمبرمجين.
و كذلك, عند تصميم الأداة يجب على العضو توضيح تأثير الأداة على أداء و سرعة البرنامج.

كانت هذه ملاحظات بسيطة من أخوكم الصغير Smile و أرجوا أن تكون مقبولة من قبلكم Smile


السلام عليكم

وعليكم السلام ورحمة الله
اسئل الله تعالي ان يبارك فيك

فكرة جميلة جدا انا اعرف موقع يبيع مجموعة ادوات ب 2000 دولار الامر ممتاز وانا معك في ذلك

وبالنسبة للملاحظة ليست مقبولة فقط بل هي ممتازة وسامحني الوقت ضيق جدا الان حتي اني مشتت في متابعة مواضيع المنتدي

خير قريب باذن الله تعالي
الرد }}}}
تم الشكر بواسطة: hoob computer
#5
(09-04-14, 04:46 AM)ali.alfoly كتب :
(08-04-14, 09:54 AM)hoob computer كتب : السلام عليكم أخي علي,

مبدع كالعادة Smile
الله يوفقك و ينولك ما أنت قاصد Wink

بالمناسبة, لو أن كل عضو في المنتدى يقوم بتصميم أدوات كهذه, علينا نحن (العرب) جمعها و من ثم بيعها للطرف الأخر (الأجانب) من أجل الاستفادة منها.
أو هنالك موقع إسمه (github) و على كل عضو في المنتدى الإطلاع عليه فهو خاص بالمبرمجين.
و كذلك, عند تصميم الأداة يجب على العضو توضيح تأثير الأداة على أداء و سرعة البرنامج.

كانت هذه ملاحظات بسيطة من أخوكم الصغير Smile و أرجوا أن تكون مقبولة من قبلكم Smile


السلام عليكم

وعليكم السلام ورحمة الله
اسئل الله تعالي ان يبارك فيك

فكرة جميلة جدا انا اعرف موقع يبيع مجموعة ادوات ب 2000 دولار الامر ممتاز وانا معك في ذلك

وبالنسبة للملاحظة ليست مقبولة فقط بل هي ممتازة وسامحني الوقت ضيق جدا الان حتي اني مشتت في متابعة مواضيع المنتدي

خير قريب باذن الله تعالي

أشكرك أخي العزيز (علي) على تقبل فكرة بيع الأدوات و الملاحظات Smile
الله يوفقك ...


السلام عليكم
الرد }}}}
تم الشكر بواسطة:
#6
السلام عليكم

على فكرة يا أخ على : أنت خامة جيده لكن محتاج تطوير

يعني أقول لك على حاجة :
صار لي مبرمج مش أقل من 24 سنه وتعلمت 11 لغة لوحدي وعملت فيها العجب وعملت برامج وكتبت أكواد بعدد شعر راسي
لكن :
لما دخلت مجال العمل الأحترافي ( { أسسنا شركة تتعامل مع الزبائن وتصنع أنظمة بمقابل مادي }) ,, الموضوع أختلف كليا
في كل النواحي ,,, طبعا الناس بتطلب أنظمة معقده والشركة بتقبلها
وبيتم تكليفي بجزء من النظام
وللامانه خلال العمل بتواجه صعوبات كثير ولازم علشان تحل المشاكل لازم وضروري جدا يكون عندك خيال برمجي واسع
والأكواد والطريقة التى بنستخدمها مش موجوده على الأنترنت ولا حتى في المنتديات ,,, هى أختراع خاص بنا ..

الخلاصة :
أنت علشان تتطور لازم تقوي قلبك وتغامر وتوسع فكرك وتقرأ كثير وتاخد دورات من الميكروسوفت وحاول البحث عن الفكرة قبل العمل..

أما مسئلة انك تضيع وقت كبير في صناعة أداة ,,, فهذا هدر للوقت وهدر للطاقة ..

انا صممت 12 أداة في أقل من شهرين وما بستخدمها ,, انا بستخدم DevExpress 2013
بس خلاص .

Abu Ehab : Microsoft Partner  & Systems Developer
الرد }}}}
تم الشكر بواسطة: hoob computer , Sniper.ps , kslawy , ali.alfoly , Omar Mekkawy
#7
السلام عليكم
حبيبي ابو رائد
جزاك الله خيرا علي هذا الكلام النابع من خبرة وتجارب فعلا كلامك بيوحشني
ولي تعليق بسيط
انا لا اصنع الاداة في وقت طويل انا من الناس الي مقتنع بشئ واحد وهو ان ابتدئ من حيث انتهي الاخرون
انظر الكود السابق لا يتعدي السطرين كتبته في اقل من 5 دقائق
لاني قمت باعدة رسم الليست بوكس ولم اقم بتصميم ليست بوكس خاص
واجمل ادوات في الدنيا ادوات ميركرو سوفت انا عملت طويلا بلغة LUE القمر بالاسبانية هههه وتعاملت مع كثير من الادوات
ملخص الكلام اجمل وقت يستحق التعب فيه وقت كتابة الكود
كود قوي منقح + بساطة في المظهر = Wink
تحياتي
الرد }}}}
تم الشكر بواسطة: Omar Mekkawy
#8
مشكور يا أخوي لكن عندي سؤال المتغيرات Chck_yes And Chck_no هل ه متغيرات من نوع معين أم إيش بالزبط وشكرا
الرد }}}}
تم الشكر بواسطة:
#9
ههههههه والله جميلة Big Grin


(09-04-14, 01:25 PM)Abu Ehab كتب : السلام عليكم

على فكرة يا أخ على : أنت خامة جيده لكن محتاج تطوير

يعني أقول لك على حاجة :
صار لي مبرمج مش أقل من 24 سنه وتعلمت 11 لغة لوحدي وعملت فيها العجب وعملت برامج وكتبت أكواد بعدد شعر راسي
لكن :
لما دخلت مجال العمل الأحترافي ( { أسسنا شركة تتعامل مع الزبائن وتصنع أنظمة بمقابل مادي }) ,, الموضوع أختلف كليا
في كل النواحي ,,, طبعا الناس بتطلب أنظمة معقده والشركة بتقبلها
وبيتم تكليفي بجزء من النظام
وللامانه خلال العمل بتواجه صعوبات كثير ولازم علشان تحل المشاكل لازم وضروري جدا يكون عندك خيال برمجي واسع
والأكواد والطريقة التى بنستخدمها مش موجوده على الأنترنت ولا حتى في المنتديات ,,, هى أختراع خاص بنا ..

الخلاصة :
أنت علشان تتطور لازم تقوي قلبك وتغامر وتوسع فكرك وتقرأ كثير وتاخد دورات من الميكروسوفت وحاول البحث عن الفكرة قبل العمل..

أما مسئلة انك تضيع وقت كبير في صناعة أداة ,,, فهذا هدر للوقت وهدر للطاقة ..

انا صممت 12 أداة في أقل من شهرين وما بستخدمها ,, انا بستخدم DevExpress 2013
بس خلاص .

أخوي أبو إيهاب أنا كانت في فكرة في رأسي وهي دمج السجلات المتشابهة أو ذات صنف واحد في المخزن بمعنى مثلاً لقيت سجلين من نوع لحمة في الجدول بيتم جمع السجلين والكميات وحذف احد السجلين Big Grin

تصدق ما اخدت في ايدي 3 ساعات وعملتها كنت بخطط مثل اللي راح يعمل معركة حربية وفعلاً أخدت وقت كبير حبتين مني في التفكير ههههههههههههه
Smile
اللَّهُمَّ أَنْتَ رَبِّي ، لا إِلَه إِلاَّ أَنْتَ خَلَقْتَني وأَنَا عَبْدُكَ ، وأَنَا على عهْدِكَ ووعْدِكَ ما اسْتَطَعْتُ ، أَعُوذُ بِكَ مِنْ شَرِّ ما صنَعْتُ ، أَبوءُ لَكَ بِنِعْمتِكَ علَيَ ، وأَبُوءُ بذَنْبي فَاغْفِرْ لي ، فَإِنَّهُ لا يغْفِرُ الذُّنُوبِ إِلاَّ أَنْتَ .
الرد }}}}
تم الشكر بواسطة:
#10
تصميم اداة يمكن ان يختصر لوقت ايضا عندما تستخدمها في مشاريع لاحقة وتكون شيء مميز لمشاريعك
لكنها تحتاج الى خيال خصب لان مايكرو سوفت قالت كل شيء تقرياً
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معلومة ::: ListBox Blue Sky 14 2,437 14-11-16, 11:32 PM
آخر رد: فارس جراح
  معلومة ::: ListBox RaggiTech 11 1,007 06-10-12, 09:49 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم