| الموضوع السابق | الموضوع التالي |
الغرض
عرض مربع رسالة بنفس مواصفات الرسالة المعروضة بعبارة Application.MessageBox و تؤدي نفس وظائفها، و لكن باستعمال النوع string بدل PAnsiChar مع تعريب مربع الرسالة (محاذاة إلى اليمين، و اتجاه القراءة من اليمين إلى اليسار).
الصيغة
function MsgBox(Text: string; Flags: LongInt = MB_OK; Caption: string = ''): Integer;
الوسائط (Parameters)
| Text | نص الرسالة، و هو البارامتر الوحيد المطلوب. | |
| Flags | بارامتر اختياري يحدد مواصفات الرسالة (الأزرار، رمز الرسالة (Icon)، الزر الافتراضي). استعمل نفس الثوابت التي تستعمل مع Application.MessageBox (و هي الثوابت التي تبدأ بـ MB_). لاحظ أن أحد أسباب إنشاء هذه الدالة هو تعريب الرسالة، و بالتالي لا داعي لاستعمال الثابتين MB_RIGHT و MB_RTLREADING لأن الدالة تقوم بتضمينهما تلقائياً في مواصفات الرسالة. إذا أهملت هذا البارامتر فإن الرسالة تظهر دون رمز، و زر واحد هو موافق (OK). | |
| Caption | بارامتر اختياري يحدد عنوان الرسالة. إذا أهملته فإن الدالة تستعمل عنوان التطبيق (Application.Title) كعنوان للرسالة. |
الشرح
في الواقع إن الدالة MsgBox هي تغليف للمنهج MessageBox التابع للكائن Application، فهي تعرض نفس الرسالة، و تعيد نفس القيم (IDOK أو IDCANCEL أو IDYES أو IDNO أو IDABORT أو IDRETRY أو IDIGNORE)، إلا أن الرسالة تظهر تلقائياً معربة دون الحاجة إلى استعمال ثوابت التعريب، و تستعمل النوع string بدلاً من النوع PAnsiChar، مع ترك مواصفات الرسالة و عنوانها اختياريين.
أعلى الصفحة
| الموضوع السابق | الموضوع التالي |