مثال بسيط لإنشاء شاشة ترحيب (شاشة دخول) برنامج

هذا مثال بسيط لإنشاء شاشة ترحيب (شاشة دخول) برنامج

لنبدأ .... بسم الله

- افتح دلفي 7 سينشئ مشروعا تلقائيا مرفق بــ Form1
- أضف Form آخرًا كما في الصورة :


ستحصل على الصورة :



نأتي الآن إلى تحديد خصائص الــ FORM2 الذي نحوله إلى شاشة الترحيب :
هذه الخصائص هي بالأهمية بما كان حيث أنها تحدد التموضع على سطح المكتب وكيفية ظهور الفورم وأبعاده عند تنفيذ البرنامج.
1- التسمية : Name نسمي القورم مثلا : SPLASH كما في الصورة :
2- نحدد بعض الخصائص الأخرى كما في الصورة






المرحلة الثالثة هي وضع الصورة على الفورم:
- نضيف صورة إلى الفورم كالآتي :















وبعد التغييرات حسب الحاجة تحصل على:



أخيرا المرحلة الرابعة مرحلة كتابة الكود :
نحدد الفورم Form1 ننقر مرتين عليه فتظهر شاشة الكود على الحدث FORMCREATE



نضيف الكود الآتي في المكان المحدد بسهم

كود:
Splash := TSplash.Create(Application);
Splash.show;
Splash.*******;

for i:= 1 to 250 do
begin
sleep(10);
end;
Splash.free;

فنحصل على :



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


يظهر الحوار الذي يطلب منك إضافة الفورم 2 إلى قائمة استعمالات الفورم 1 Uses]



نجيب بنعم ثم نعيد تنفيذ البرنامج من جديد بالضغط على F9

وأخيرا تظهر شاشة الترحيب في وسط الشاشة لبعض اللحظات


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



وهذا مثال عن الشاشة الرئيسية لبرنامج الكشوف المدرسية



أخيرا التمسو عذرا لأخيكم لأنه ربما نسي بعض التفاصيل المهمة