المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : كيف اظهر رساله صغيرة مع شاشه ترحيب ؟


delphi4you
01-04-2008, 02:11 PM
السلام عليكم ورحمة الله وبركآته
ادخلوا على هذي الصورة
ملآحظه تم وضع الصورة على رآبط لانها كبيره لو ادرجت في هذا الموضوع
http://www.arb-up.com/files/arb-up-2008-1/3eF51817.gif
أرائيتم ؟
شاشه ترحيبيه تظهر لبضع ثوان مع رساله ترحيبيه بالأسفل ثم تختفي ويظهر البرنآمج بعدها
كيف يمكنني عمل ذلك ؟
في انتظار جوآبكم والله ولي التوفيق ..

B.M.AbdelAziZ
01-04-2008, 05:36 PM
بسم الله الرحمن الرحيم

تلك تسمى Splash Screen
ما هي الا Form توضع بها صورة
ويتم اظهارها في Project قبل اظهار الForm الاساسية للبرنامج
مثال مرفق

والسلام عليكم ورحمة الله

delphi4ever
01-04-2008, 08:33 PM
كما ذكر الأخ DeltaAziz فذلك يسمى بالـ Splash Screen
أما فيما يخص الرسالة التي تظهر في الأسفل وبالتحديد في شريط المهام TaskBar
فيمكننا برمجتها بال API صعبة قليلا لكن،
عندي سورس لها بالتفصيل وهو ما وضعته بالمرفقات.

delphi4you
03-04-2008, 02:06 AM
الله يعآفيكم ويطول بأعماركم يآشباب !

kachwahed
04-08-2010, 10:18 PM
تغيير صغير في كود SplashScreen
with TFSplash.Create(Application) do
try
Show; // Show a splash screen
Update; // Force display of Splash Screen
Application.Title := 'Delphi4arab Slpash';
Application.CreateForm(TForm1, Form1);
Sleep(2222);
finally
Free; // Free Splash Screen
Application.Run;
end;
لا حاجة لـ Sleep إذا كانت الـ Forms كثيرة.

elanis
29-10-2011, 07:16 PM
شكرا على المعلومات القيمة