+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13)
+--- الموضوع : التعامل مع الرسائل في دلفي MessageBox & Delphi (/showthread.php?tid=55)
الصفحات:
1
2
التعامل مع الرسائل في دلفي MessageBox & Delphi - delphi4ever - 24-02-2008
السلام عليكم ورحمة الله تعالى وبركاته
التعامل مع الرسائل في دلفي Working with messages in delphi
1- الرسائل Messages: هي تلك النوافذ الصغيرة التي تظهر لنا معلومات مفيدة واستعلامات وإشارات تحذير وخطأ وتعلم مستعمل البرنامج بعدة أمور، مثل رسالة " هل تريد فعلا إنهاء البرنامج" وهناك عدة أنواع من الرسائل التي يمكن برمجتها لتظهر للمستعمل وتسمى بـ : MessageBox.
2- أنواعها: هناك عدة أنواع من الرسائل وهي كالتالي:
2-1 رسالة الخطأ Message Error وتحتوي على الإيقونة الحمراء التي تشير بوجود خطأ ويكون محتوى الرسالة حول الخطأ
2-2 رسالة تحذير Message Warning وتحتوي على إشارة التذير الصفراء التي تقوم على تحذير مستعمل البرنامج من القيام بعمل ما ويكون محتوى الرسالة دائما حول الخطر.
2-3 رسالة معلومات Message information وتحتوي على الحرف I الذي يعني بدوره information وتقوم هذه الرسالة بإعطاء معلومات مفيدة للمستعمل ويكون محتواها دائما للإعلام.
2-4 رسالة تأكيد Message Confirmation وتحتوي على علامة الإستفهام وتكون في أغلب الأحيان مستعملة من أجل التأكيد في عدة أماكن مثل : 'هل تريد إغلاق هذا البرنامج؟' ...الخ من الأماكن الأخرى
2-5 رسالة عادية Custom Message وهي رسالة عادية لا تحتوي على أي إيقونة icons ويكون عنوانها هو عنوان المشروع أي أنها لا تحمل في العنوان Error أو Warning أو أي شيئ اخر سوى عنوان المشروع.
يحتوي كل نوع من الرسائل السابق ذكرها (Error, Warning, Infomation, Confirmation, Custom) على المعلومات التالية:
1-محتوى الرسالة.
2-نوع الرسالة.
3-الأزرار Buttons الموجودة بالرسالة
4-عنوان الرسالة.
3 – أمثلة عن الرسائل في دلفي:
3-1 إنشاء رسالة عن طريق الإجراء ShowMessage
مثال:
1- نضع مكون Button ثم نقوم بالضغط مرتين عليه ونكتب ما يلي:
كود :
ShowMessage('Hello 2 ALL');ShowMessage وهي إجراء تابع للوحدة Dialog التابعة لدلفي وهذا لأنه يقوم بإظهار Dialog للمستعمل بحيث يحوي هذا Dialog على محتوى الرسالة وهو 'Hello 2 ALL' يمكننا تغيير المحتوى وهذا حسب مكان إظهار الرسالة ويجب أن يكون محتوى الرسالة بين القوسينكما هو ظاهر لأن المحتوى عبارة نص بحيث تكون هيكلة الإجراء ShowMessage كالتالي:
كود :
ShowMessage(' ');.2- في حالة ما إذا كان محتوى الرسالة يحتوي على كلمة مثل Today's أو John's أي موجود بها الرمز ' في هذه الحالة يجب على المبرمج أن يضع هذه الإشارة مرتين'' في نفس الكلمة وهذا لتفادي الخطأ بحيث سيكون محتوى الرسالة على الشكل التالي:
كود :
ShowMessage('John''s Book');3- وفي الأخير سنحصل على MessageBox يحتوي في عنوانه على إسم المشروع وفي محتواه على ما حددناه له وعلى Ok Button أيضا بحيث يكون موقع MessegeBox في وسط الشاشة ScreenCenter
3-2 إنشاء رسالة عن طريق ShowMessagePos :
يقوم هذا الإجراء الذي هو واضح من عنوانه على إظهار رسالة تحتوي على نفس محتويات ShowMessage لكن تختلف عليها في تحديد إحداثيات ظهور نافذة الرسالة MessageBox، بحيث يمكننا أن نحدد إحداثيات MessageBox عن طريق الإجراء ShowMessagePos وهو كالتالي:
كود :
ShowMessagePos('Hello 2 ALL', 100,200);بحيث أن 100 و 200 هما إحداثيات ظهور نافذة الرسالة MessageBox
5-إنشاء رسائل عن طريق الدالة MessageDlg (Fonction)
MessageDlg : هي دالة Fonction خاصة بالرسائل دائما لكنها متطورة نوعا ما وهي تابعة أيضا لـ
Dialog Unit الخاصة بدلفي ، بحيث تقوم هذه الأخيرة بإظهار رسائل منوعة كرسائل الخطأ Error والإعلام information وتأكيد Confirmation مع ظهور إيقوناتها Icons والعديد من الخصائص الأخرى.
كود :
function MessageDlg ( const Message : string; DialogType : TMsgDlgType; Buttons : TMsgDlgButtons; HelpContext : Longint ) : Integer;5- 1 : إنشاء رسالة عن طريق الدالة MessageDlg
![[صورة: exge7.jpg]](http://img231.imageshack.us/img231/9664/exge7.jpg)
1 - نضع مكون Button ثم نقوم بالضغط مرتين عليه ونكتب ما يلي:
كود :
MessageDlg(' Would you really Exit this program? ', mtconfirmation,[mbyes,mbno],0);•Messagedlg : هو معرف الدالة وهو ضروري ويجب كتابته دائما.
•Would you really Exit this program? : محتوى الرسالة.
•mtConfirmation: ويعني نوع الرسالة Dialog Type ، فمثل هذه الرسالة تسمى برسالة التأكيد Confirmation و mt تعني MessageType هناك أنواع كثيرة من أنواع الرسالات وقد تطرقنا إليها في أول الموضوع كـ: (Error, Warning, Infomation, Confirmation, Custom)
• [mbyes,mbno]: وهي أزرار الرسالة Dialog Buttons التي تظهر لنا في مربع الرسالة مثل Ok و Cancel و yes و No ...الخ بحيث أنه توجد مجموعة لا بأس بها من Dialog Buttons و Mb تعني لنا Message Button وهناك عدة أنواع وهي: MbAbort, MbHelp, MbCancel, MbIgnore, MbNO, MbNoToAll, MbOk, MbYes, MbYestoAll, MbRetry, MbAll) يمكن إستعمال أي نوع من الأزرار السالف ذكرها مع بعض وهذا عن طريق ترك فاصلة بين الواحدة والأخرى ، مثال [mbyes,mbno,mbretry] وهذا حسب رغبة المبرمج.
•0: يمثل لنا Help ID أو كما يسمى بـ Help Context
6-2 إنشاء رسالة عن طريق الدالة MessageDlgPos :
![[صورة: inputbv4.jpg]](http://img223.imageshack.us/img223/5571/inputbv4.jpg)
تعمل هذه الدالة Fonction نفس عمل الدالة الأولى MessageDlg لكن تقوم هذه الأخيرة بتحديد إحداثيات لنافذة الرسالة DialogBox وهذا بإعطاء قيمتين بعد الصفر في الدالة على الشكل التالي:
كود :
function MessageDlgPos ( const Message : string; DialogType : TMsgDlgType; Buttons : TMsgDlgButtons; HelpContext : Longint; X, Y : Integer ) : Integer;مثال :
كود :
inputBox('Search: ', 'Find This Word',' ');•inputBox: هي الدالة نفسها.
•Search : يوضع مكانها عنوان النافذة Title of Dialog
•Find This Word: يوضع مكانها التعليق الذي سيوضع مباشرة فوق مربع البحث
•' ' : يمثل هذا الفراغ محتوى المربع أي بإمكاننا كتابة أي شيئ فيه أو تركه كما هو.
وللمزيد من التفاصيل قم بتحميل الملف المصدري Source-Code الموجود بالمرفقات.
والله ولي التوفيق
التعامل مع الرسائل في دلفي MessageBox & Delphi - xinofix - 25-02-2008
هناك تعليمة أخرى
MessageBox
PHP كود :
Application.MessageBox('Quitter maintenant', 'Information', MB_ICONINFORMATION)
التعامل مع الرسائل في دلفي MessageBox & Delphi - musvc - 24-01-2009
مادام انت شرحت عن الـ MessageBox كان تكمل معروفك و تشرح عن الـ MesssageDLg
على العموم نسيت نقطة مهمة و هي :
انسخدام If في الـ MessageBox
مثال :
كود :
[color=Blue][B]if [/B][/color]MessageBox(0,[color=RoyalBlue]'Press yes or no ..'[/color],[color=royalblue]'Title'[/color],MB_YESNO + MB_ICONINFORMATION)=Id_YES then
[color=Blue][B]Begin[/B][/color]
ShowMessage('You pressed yes');
[color=blue][B]end[/B][/color] [color=blue][B]else[/B][/color]
[color=blue][B]Begin[/B][/color]
ShowMessage('You pressed no');
[color=blue][B]end;[/B][/color]التعامل مع الرسائل في دلفي MessageBox & Delphi - حسين سالم - 02-02-2009
اول مشاركة أتمى تنال اعجابكم
برنامج يقوم بعرض الرسائل باللغة العربية بشرط أن يكون نظام windows المستخدم يدعم اللغة العربية
messageDlg.rar (الحجم : 1.84 ك ب / التحميلات : 180)
التعامل مع الرسائل في دلفي MessageBox & Delphi - musvc - 11-02-2009
حسين سالم كتب :اول مشاركة أتمى تنال اعجابكم
برنامج يقوم بعرض الرسائل باللغة العربية بشرط أن يكون نظام windows المستخدم يدعم اللغة العربية
messageDlg.rar
طبعا سوف تعجبنا , شكرا لك و هلا بك مهنا
التعامل مع الرسائل في دلفي MessageBox & Delphi - Ahmed18 - 27-02-2009
شكرا لك اخي معلومات مفيدة جدا
-
إقتباس :هناك تعليمة أخرىهذة بأستخدام ال api
application.messagebox
التعامل مع الرسائل في دلفي MessageBox & Delphi - معمر محسن - 16-05-2009
الاخ حسين سالم شكرا على البرنامج ولكن هل يمكن تغيير كابشن الازرار الى نعم لا بدلا من yes no
التعامل مع الرسائل في دلفي MessageBox & Delphi - مايكل قمر - 03-06-2009
شكرا الكون كتير شباب وشي مميز كتير يكون في مناقشة بين الاعضاء بعد عرض الموضوع
التعامل مع الرسائل في دلفي MessageBox & Delphi - rm31 - 06-07-2009
السلام عليكم ورحمة الله وبركاته
من هنا برنامج رائع للكتابة السريعة
جيد أتمنى منكم تجريبه
من هنا
التعامل مع الرسائل في دلفي MessageBox & Delphi - قديم الشوق - 15-07-2009
وعليكم السلام ورحمة الله وبركاته
الله يعطيك العافيه ومشكور على الدرس الجميل
كيف اضيف خانة للعنوان بالكود
هذا كود الرسالة ابغى اعنونها
إقتباس :showmessage('how');