الان حمل برنامج Abo Sabreen Messenger v2.1 العملاق

بصراحة يا مجنون، كنت في المتوسط والثانوي لا أجعل أحدا يرى شفرة برامجي (الخيالية)... أحس أنها جزء مني... وأفهم هذا الأمر من أخي أبو صابرين... تغير تفكيري عندما غزتنا الشبكة العنكبوتية ورأيت برامج مع شفراتها لا أحلم أبدا بكتابة مثلها!!!!

طبعا أدركت في نهاية الثانوي أن شفرات برامجي هي بمثابة كتاب كتبته أحب من غيري قراءته!! ولو لم يقرأه أحد لمات كما تموت شفراتي القديمة!!

إلا أني حتى الآن لم أجعل شفراتي في متناول الجميع... بل جعلتها لمن يريدها، وقدمتها فقط للصفحات العربية وخاصة هذا المنتدى... ولا أفكر في وضع البرامج ولاشفراتها في صفحات أجنبية!!! (عقدة)

اولا : الاخ مهند .

اقتباس

اسف فلم استطع استعماله ربما لانه احترافي جدا

:rolleyes: اخ منك انت ما اقواك

على العموم انا قمت بالتعديلات الازمة للبرنامج قم بتحميله من موقعي وان شاء الله بيشتغل معك 100%.

ثانيا: الاخ crazy man

اقتباس

يا أخي هل تريد من كل واحد أن يقول لك أعطني الكود؟؟؟؟

انا لم اقصد اخي السورس كود كاملا انما اقصد النقطة التي لم يعرف عملها

يعني مثلا كيفية اضافة ايقونة على الInternet explorer toolbar

اما بالنسبة لوضع السوروس كود فانت اخي وجهة نظرك تختلف عني

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

ومن ثم تجد برنامجك في اسم شخص ما او يمكن صديقك ويبدا التفاخر امام اصدقائك البقية بانه هو من عمل البرنامج

وانا اعتقد ان هذه النوعية من الناس قليلة ولكنها موجودة

واخي انا لست هنا لاستعراض العضلات فالحمدلله نشرت برنامجي على معظم المنتديات

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

اقتباس

بصراحة يا مجنون، كنت في المتوسط والثانوي لا أجعل أحدا يرى شفرة برامجي (الخيالية)... أحس أنها جزء مني... وأفهم هذا الأمر من أخي أبو صابرين...

يسلم فمك

اقتباس

طبعا أدركت في نهاية الثانوي أن شفرات برامجي هي بمثابة كتاب كتبته أحب من غيري قراءته!! ولو لم يقرأه أحد لمات كما تموت شفراتي القديمة!!

هيك زعلتني منك

اخي ابو مازن انت لم تعملني طريقة ال Threading

الان اخواني كل من واجه مشاكل في الاصدار السابق يمكنكم تحميل الاصدار النهائي :

للتحميل ( لا تستخدم برامج الداونلود نهائيا) ع

اقتباس

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

أولا : مر معي أني استغرقت في برنامجي مدة طويلة لكن رغم ذلك وضعته في ذاك المنتدى لأني لم أكن في ذلك الوقت منتميا لهذا المنتدى و أعرف صديقا لي (فرنسي الجنسية) استغرق في برنامجه أقل ما يقال عليه راااائع حوالي السنة و النصف و بعد ذلك وضع الكود دون تردد

ثانيا : دعني أحلل لك برنامجك و أعطيك ما كتبت أنت دون الحديث عن الأشياء التي أخذتها و تعلمتها من أكواد الآخرين و لا من الأدوات مثل أداة OsenXP و لا ايه اسمها !!!!!

برنامجك كاملا يرتكز على هذا السطر

Shell "cmd.exe /c net send " & PC & " " & MSG, vbHide

حيث أن PC هو اسم الكمبيوتر و MSG نص الرسالة

اذا كما نلاحظ هذا السطر أو هذه الفكرة هي نواة البرنامج اما باقي الاكسسوارات فليست سوى للزينة

نقطة أخرى تخيل ان كل المبرمجين لهم نفس وجهة نظرك أي "لن أعطي قطعة من كودي الا لمن يطلبها مني" فهل كنت أنت ستعرف كيف تضع مثلا صور في البار????? هل كنت أصلا عرفت كيف تعمل برنامجك ??????

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

أتمنى أن لا يجرحك كلامي هذا لكني كما سبق وقلت انا لا أتكلم الا غيرة على المنتدى.

و السلام عليكم

انا بس ليا تعقيب مالوش علاقة بالموضوع

مين قالك اني اسمي مهند؟؟؟؟؟؟؟؟؟؟

اعتقد ان توقيعي يحمل اسمي بالكامل

Mohammed

Mohamned

Mohanned

:D :D :D :D

ياعم ايه الجديد في النسخة الجديدة من المسنجر العملاق برضه بيعلق و لازم يتعمله End Process .................

اخي محمد ولا مهند المهم انت باشا كبير

وانا لا انظر الى الناس باسمائهم وانما بعقولهم وانت ما شاء الله عقلك عملاق مثل برنامجي (h)

اخي نسيت ان اخبرك ان هذا التعديل لا يزبط عندما تكون النسخة القديمة منصبة على الجهاز

وانا اعتذر عن هذا الخطا الغير مقصود

اخي ارفقت لك ملف شغله عندك ومن ثم قم بتشغيل برنامجي

وتجرته واخباري رايك لانه يهمني

هنالك عودة لك اخي crazyman لاني انا الان مستعجل جدا وجرب الملف اخي crazyman واخبرني عن رايك بالبرنامج ان شاء الله.

Project1.rar

؟؟؟؟؟؟؟؟؟

جربت الملف الملف المرفق و أظهر لي نسج Modified

يعني ؟؟!!!!؟؟؟؟؟؟؟

الان شغل برنامج Abo Sabreen Messenger v2.1

وان شاء الله ما رح يعلق

يا ريت ماتقارنش عقلي ببرنامجك العملاق

عزيزي ابو صابرين

أنا قمت بمسح البرنامج و عندما قمت بتشغيل البرنامج الصغير الذي أرفقته قال لي Modified !!!!!!!!!!!!

ثانيا أجبني عن مشاركتي السابقة حابب أسمع رأيك :)

اولا : الاخ محمد

كله ولا تزعل ولكن هل جربت تشغيل البرنامج بعد تشغيل الملف المرفق الذي ارفقته؟

ثانيا : الاخ crazy man

انا لم انساك اخي وسوف اقوم بالرد على مشاركتك اليوم مساءا باذن الله؟

الم تقل لي اخي ان البرنامج علق معك؟!!!

اعد تنصيب برنامجي Abo Sabreen Messenger من جديد وشغله واخبرني اذا اشتغل ولا علق عند التشغيل

نعم معي لكني أزلته

بس ممكن سؤال ... ماذا يعدل هذا الملف في البرنامج ؟ أم أن هذا أيضا سر !!!!!

اخي crazy man طبعا لا يمكن ان يكون سر على العكس هذا ما اريده

اخي انا حاط في حدث الفورم لود لبرنامجي كود لاستعراض جميع الاجهزة على الشبكة وطبعا البرنامج يستعرض الاجهزة حسب قيمة داخل الريجستري فاذا كانت القيمة = 1 يتم استعراض

الاجهزة واذا كانت = 0 لا يستعرض الاجهزة وطبعا عند تشغيل البرنامج لاول مرة تكون هذه القيمة = 1 وهذا الملف يجعل القيمة = 0.

اخي انا اعطيتكم هذا الملف لاني اعتقد ان تعليق البرنامج له سببان لا ثالث لهما :

1. عندما لا يكون هنالك شبكة وعند استعراض الاجهزة ل ايعرف البرنامج ماذا يفعل.

2. الاداة osenxpsuite لا تشتغل على كل الاجهزة

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

آسف أبو صابرين، لكن لا أعرف تنفيذ Multi Threading في VB.

حاولت البحث في الشبكة وهذا ما وجدته لك.

http://www.freevbcode.com/ShowCode.asp?ID=1287

معقدة بالنسبة لي!!

كنت أتمنى أني أعرف تعدد المجاري في QBasic!! أيام قديمة!!!

عموما في بيئة .Net ستكون أسهل بكثير!!!

بالتوفيق!!

شكرا لك اخي ابو مازن على محاولتك لمساعدتي وانا اقدر لك ذلك بشدة

ويا ريت اخي تعطيني فكرة بسيطة عن ال Multi Threading على اي لغة المهم الفكرة حيث اني عندما قرات المقال رايت ان ال multi threading لها اهمية واضحة في جعل البرنامجي يعمل بدون freezing.

الاخ Crazy man الرد الذي وعدتك به :

اقتباس

أولا : مر معي أني استغرقت في برنامجي مدة طويلة لكن رغم ذلك وضعته في ذاك المنتدى لأني لم أكن في ذلك الوقت منتميا لهذا المنتدى و أعرف صديقا لي (فرنسي الجنسية) استغرق في برنامجه أقل ما يقال عليه راااائع حوالي السنة و النصف و بعد ذلك وضع الكود دون تردد

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

اقتباس

ثانيا : دعني أحلل لك برنامجك و أعطيك ما كتبت أنت دون الحديث عن الأشياء التي أخذتها و تعلمتها من أكواد الآخرين

انا الحمد لله اخي لم اتطلع على اي سورس كود لاي برنامج قط , لاني لا اشعر حالي اني ابرمج عندما اعمل copy و Paste للكود.

وانا لم انكر ان هنالك اكواد شبه جاهزة مثل ال Ballon Tip والايقونة على Internet Explorer Toolbar ولكني اجريت

التعديلات الازمة عليها ( وحقيقة انا لم اجدها بسهولة وانما بحثت كثيرا لكي اجدها ).

وانا اعتقد ان مثل هذه الاكواد لا يستطيع عملها الا الذين يكون لديهم خبرة في برمجة الويندوس.

اقتباس

ولا من الأدوات مثل أداة OsenXP و لا ايه اسمها !!!!!

اخي ليس العيب ان تستخدم اداوت جاهزة مثل ال xpsuite وانما المهارة ان تجيد استخدامها وايجاد الحل لاي مشكلة قد تواجهها واذا

انت تعتبر ان البرنامج القوي لا يجب استخدام ادوات جاهزة به فهل نسيت انك عندما تبرمج في ال vb انك تستخدم اداة ال Button او

Label او ماشابه , اليست هذه ادوات جاهزة من ميكرسوفت؟؟!!!!!!!.

اقتباس

برنامجك كاملا يرتكز على هذا السطر

Shell "cmd.exe /c net send " & PC & " " & MSG, vbHide

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

الم تسأل نفسك كيف يمكنني ان اعرف اذا وصلت الرسالة ام لا ؟؟؟

الم تسال نفسك كيف امكنني تغيير اسم الجهاز المرسل منه؟؟؟

اخي كود الارسال اعقد مما تتصور وسوف اقوم بارفاقه قريبا باذن الله.....

اقتباس

اذا كما نلاحظ هذا السطر أو هذه الفكرة هي نواة البرنامج اما باقي الاكسسوارات فليست سوى للزينة

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

اقتباس

نقطة أخرى تخيل ان كل المبرمجين لهم نفس وجهة نظرك أي "لن أعطي قطعة من كودي الا لمن يطلبها مني" فهل كنت أنت ستعرف كيف تضع مثلا صور في البار????? هل كنت أصلا عرفت كيف تعمل برنامجك ??????

انا مستعد لاعطاء اي جزء من الكود من البرنامج للجميع ولكني حقيقة لم يطلب مني احد اي كود.

ارجع اخي الى الوراء قليلا وسوف ترى انك انتقدت بدون قصد الذين يطلعون الى السورس كود :

اقتباس

دعني أحلل لك برنامجك و أعطيك ما كتبت أنت دون الحديث عن الأشياء التي أخذتها و تعلمتها من أكواد الآخرين

الم ترى ان الفن هو صنع اكواد بنفسك حتى تشعر انك انجزت شيئا....

اقتباس

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

اخي انا إن شاء الله سوف اقوم بتجزئة البرنامج الى اكواد واقوم بتوضيح عمل الكود اذا وجدت من يهتم!

اقتباس

أتمنى أن لا يجرحك كلامي هذا لكني كما سبق وقلت انا لا أتكلم الا غيرة على المنتدى.

على العكس انا كما قلت من البداية اكره كلمة مشكور وما شاء الله على البرنامج وانما ابحث عن الاشخاص الذين ينتقدون البرنامج والمبرمج :lol:

اقتباس

و السلام عليكم

وعليكم السلام

او يمكنني القول تصبحوا على خير لانه الساعة الواحدة ليلا وانا صار لي حوالي ساعة بكتب بهالمشاركة.

انا انتظر ردك انت والاخ بش مهندس بشان اذا اشتغل البرنامج ولا لا

اقتباس

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

لا يعلم ما في الصدور الا الله.

ثم تعالى ماذا فيها لو كان يطمع في شئ من ذلك ... أنت لماذا تذاكر بكل جد و اجتهاد ?? لتنجح و هو كذلك ... المهم أنه أفاد غيره

اقتباس

اخي ليس العيب ان تستخدم اداوت جاهزة مثل ال xpsuite وانما المهارة ان تجيد استخدامها وايجاد الحل لاي مشكلة قد تواجهها واذا

انت تعتبر ان البرنامج القوي لا يجب استخدام ادوات جاهزة به فهل نسيت انك عندما تبرمج في ال vb انك تستخدم اداة ال Button او

Label او ماشابه , اليست هذه ادوات جاهزة من ميكرسوفت؟؟!!!!!!!.

من قال اني ضد استعمال الأدوات الجاهزة انا قصدت أنك في برنامجك لم تقم بكتابة أشياء قد يعجز عنها الكثيرييييين و من حقك استعمال الأدوات التي تريد

اقتباس

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

الم تسأل نفسك كيف يمكنني ان اعرف اذا وصلت الرسالة ام لا ؟؟؟

الم تسال نفسك كيف امكنني تغيير اسم الجهاز المرسل منه؟؟؟

أنا حقيقة لم أجرب جميع خصائص برنامجك فقط فهمت فكرته العامة لذلك حللت تلك الفكرة بهذه الطريقة

و بالنسبة لكيف تتأكد من وصول الرسالة فذاك أمر بسيط حيث أنك يمكن قراءة ناتج عميلة Net Send من خلال الدوس يعني اذا أرجع الدوس سطر يؤكد وصولها فقد وصلت و ان كان غير ذلك فالرسالة سقطت في الطريق

و على فكرة أنا وضعت هذا السطر كصورة عامة لاستخدام برنامجك

اقتباس

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

جميل أن تعمل برنامج يضاهي البرامج الأجنبية و جميل أكثر أن تشارك الآخرين نشوة فرحتك

اقتباس

انا مستعد لاعطاء اي جزء من الكود من البرنامج للجميع ولكني حقيقة لم يطلب مني احد اي كود.

هذا المنتدى أسمه "منتدى مبرمجي Microsoft Visual Basic" و هو ليس منتدى اعلانات و لا أظن أن شخصا مثلك قضى حوالي ال 4 أشهر هنا و لا يعرف أن هذا منتدى تعليمي !!!!!

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

و السلام عليكم

السلام عليكم

البرنامج يعمل عندى جيدا

و بالنسبة للأخوة اللى البرنامج بيعلق معاهم فالبرنامج مش بيشتغل كويس غير على Windows XP or 2000

لأنى شغلته على 98 وعلق معايا

و تقريبا التعليق ده نتيجة وجود Loop لا نهائى بسبب شئ معين غلط أو API لا تعمل الا على Win XP و الله أعلم لأنى لا املك السورس كود !! :)

اوكي اخي crazy man سوف ننهي هذا النقاش

واحب ان اقول شغلة وحدة هو انني لم اطرح البرنامج في هذا المنتدى الا لانني اود ان ارى ارائكم كمبرمجين وحقيقة انا لم ارى اي تعليق لحد الان.

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

اقتباس

انا انتظر ردك انت والاخ بش مهندس بشان اذا اشتغل البرنامج ولا لا

انا شايف انه الاخ محمد زعل!!!!! :( لانه لم يرد علي لحد الان.

اخي vb6-rocket

ما شاء الله عليك اخي عرفت سبب التعليقة من غير السورس كود وهذا الكود الذي يعلق عليه البرنامج

 On Error Resume Next


        Dim compNames() As String
        Dim compName As String
        Dim x As Integer

        Combo1.Clear
        x = 0
        compNames = GetServers(Combo1.Text, SV_TYPE_ALL)
        If UBound(compNames) > 0 And UBound(compNames) < "500" Then
            For x = LBound(compNames) To UBound(compNames) - 1
                Combo1.additem compNames(x)
            Next
            Combo1.ListIndex = 0
        End If

        Call GetComputerName(tmp, Len(tmp))
        frmtxt.Text = TrimNull(tmp)
        text1.Text = TrimNull(tmp)
    Else

        Call GetComputerName(tmp, Len(tmp))

        text1.Text = TrimNull(tmp)
        Combo1.Text = TrimNull(tmp)
        frmtxt.Text = TrimNull(tmp)

    End If
 On Error Resume Next


        Dim compNames() As String
        Dim compName As String
        Dim x As Integer

        Combo1.Clear
        x = 0
        compNames = GetServers(Combo1.Text, SV_TYPE_ALL)
        If UBound(compNames) > 0 And UBound(compNames) < "500" Then
            For x = LBound(compNames) To UBound(compNames) - 1
                Combo1.additem compNames(x)
            Next
            Combo1.ListIndex = 0
        End If

        Call GetComputerName(tmp, Len(tmp))
        frmtxt.Text = TrimNull(tmp)
        text1.Text = TrimNull(tmp)
    Else

        Call GetComputerName(tmp, Len(tmp))

        text1.Text = TrimNull(tmp)
        Combo1.Text = TrimNull(tmp)
        frmtxt.Text = TrimNull(tmp)

    End If

وانا كنت اعتقد ان المشكلة في ان الكود يعمل على بعض الاجهزة وان الجملة on error resume next تحلها

ولكن شكله ان جملة الدوران كما قلت انت لا نهائيا

قمت ببعض التعديل البسيط وان شاء الله بنجح

والسلام

واؤكد مرة اخرى على الاخ crazy man و البشمهندس

اقتباس

لقد اشتغل البرنامج لكن لا يريد ارسال رسالة الي و يعطي رسالة خطا رغم أن عندي Win Xp SP2

انا سعيد لان البرنامج اشتغل معك اخي crazy man وشكرا لك على المتابعة

اخي انا كاتب في اول مشاركة ان برنامجي يشتغل على ويندوس اكس بي و 2000 و 2003

ولكن في الويندوس اكس بي سيرفس باك 2 تم ايقاف خدمة المسنجر في الويندوس وذلك بسبب الازعاجات التي يتعرض لها مستخمي الشبكات.

ولتفعيل خدمة المسنجر اتبع الاتي :

.اذهب الى ال run واكتب services.msc ومن ثم اضغط okj.

2. على اليمين سوف تظهر بعض خدمات الويندوس اختر Messenger

3.سوف تظهر نافذة , عند startup type اختر manual ومن ثم اضغط apply الموجودة في الاسفل.

4.سوف يتم تفعيل الزر Start ما عليك سوى الضغط عليه

نسيت ان اسالك اخي

اذا كنت جربت البرنامج بشكل جيد , فما رايك به بصراحة ؟

هل يضاهي البرامج الاجنبية؟

هل تصنفه من ضمن البرامج العربية المتميزة؟

وبكل صراحة تامة حيث انني احب الصراحة

والسلام

اخى ابو صابرين

ليكون البرنامج احترافى

انصحك ألا تستخدم On Error Resume Next الا للضرورة القصوى

و ان تضع مكانها محلل للأخطاء ترسل اليه رقم الخطأ و وصف الخطأ و اسم ال Sub أو Function التى حدث فيها الخطأ و يتم تسجيل هذه الاخطاء فى ملف Error Log و يتم إظهار رسالة للمستخدم تنصحه فيها بالاتصال بصاحب البرنامج أو الشركة وارسال ملف ال Error Log حتى يتم التعرف على الخطأ .

ولاحظ أننى اتكلم هنا عن الاخطاء التى لم تعمل حسابها فقط .

و أيضا انصحك عند طرح برنامج لأول مرة لابد ان تطرح الاصدار باسم Beta Version لأنك غير متأكد من دقة البرنامج و العيوب الخفية التى تظهر مع الاستخدام وبالتالى بعد تلقى الشكاوى و الاقتراحات يتم تعديلها والوصول بالبرنامج الى الاصدار النهائى ..... وهذه الفكرة تنفذها شركات كبيرة بها فريق عمل كامل فما بالك انت ببرنامجك المسكين الذى لا يرعاه احد غيرك ..

أرجو ان اكون افدتك :)

اقتباس

واحب ان اقول شغلة وحدة هو انني لم اطرح البرنامج في هذا المنتدى الا لانني اود ان ارى ارائكم كمبرمجين وحقيقة انا لم ارى اي تعليق لحد الان.

أخي لديك: 72 مشاركة و 16 تصويت!!

لا اخي انا لم اقصد عدم التفاعل مع الموضوع على العكس انا وجدت التغاعل التام مع الموضوع والذي لم اكن اتوقعه حقيقة.

ما قصدته انه لا يوجد تعليقات او ملاحظات على البرنامج بشكل كاف

حيث انني وضعت البرنامج هنا لارى اكبر قدر من الملاحظات عليه حى يتم تطوير برامجي باذن الله في المستقبل

والسلام

البرنامج لا يفيدني شخصيا، ولهذا قد لا أعلق على البرنامج كمستخدم، ولا أدقق على الشكل الجمالي بقدر ما أدقق على العمل وطريقة تصميم الشفرة!

لو أردت أرسل الشفرة إلى أحد أعضاء المنتدى تثق به أن لا ينشر شفرتك ليحلل لك برنامجك!!

بصفة عامة، استخدمت البرنامج، ولاحظت جمود النافذة لبضع ثوان ولهذا أقترح عليك Threading، كما أن تعليق الأخوة يبين أن برنامجك يتجمد كليا بعض الأحيان، وهذه أخطاء يجب تصحيحها! أضف إلى ذلك أن البرنامج عليه أن يبين نوع الخطأ الذي حصل!!

إذا أردت تحليل برنامجك أكثر فالشفرة تفيد كثيرا!! بعض برامجي في توقيعي وأحب أن يعلق أحد على شفراتها ويفيدني!!

بالتوفيق!