=>((إنشاء رسالة ترحيبية لمستعمل الأسطوانة وأخرى لتوديعه))<=



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

وهذا ما سنتطرق إليه في درس اليوم



أولا قم بفتح المشروع الملطلوب واذهب إلى الأمر project ثم اختر الأمر Actions كما في الصورة




تظهر لنا نافذة Action editor ونختار On Startup وقم بنسخ هذا الكود

الكود:

user = Application.LoadValue("Information", "karim_dz");

if user == "" then

    user = "Unknown User";

    user = Dialog.Input("Information Requested", "من فضلك قم بإدخال إسمك في هذه الخانة:", "", MB_ICONQUESTION);

    Application.SaveValue("Information", "Name", user);

end

Dialog.Message("Welcome", "هلا وغلا بك أخي "..user..", مرحبا بك في أسطوانتي المتواضعة");

قم بمعاينة المشروع بالضغط على F5 من لوح المفاتيح والنتيجة


وهذا هو الترحيب


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

وترغيبه في إنتظار الإصدارات المقبلة من الأسطوانة



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

الكود:

Dialog.Message("Thank you", "شكرا لك أخي  "..user..", أتمنى أن تكون قد أعجبتك أسطوانتي");

كما في الصورة


وقم بالمعاينة