الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية عمل لsplash-screen لمدة معينة

بدأه ahmedico في 21 فبراير 2009 · 4 رد · 641 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

انا مبتدأ حديثا بالفيجوال بيسك6 فاسف للإزعاج

باسألتي اللي اعتقد انها مزعجة بعض الشيء

اريد كود لأظهار صورة لمدة معينة قبل بداية البرنامج بالعمل

واللي عرفت بعد كده انها اسمها الـSPLASH-SCREEN

اللي قدرت اتوصل اليه هو

Private Sub Timer1_Timer()

Unload Me ‘Unload the Splash Form

frmMain.Show ‘Load the Main Form

End Sub

ده لو افترضنا ان الفورم بتاعت الSplash اسمها frmSplashScreen.frm

والفورم الرئيسية للبرنامج اسمها frmMain.frm

وخلينا الـstart upfrmSplashScreen.frm

للـ

بس اللي بيظهر بس الفورم بتاعت الأسبلاش من غير ما يظهر البرنامج

ازاي اقدر اعدل في مدة ظهور الأسبلاش وبداية عمل البرنامج.. وشكرا

#2

إذا كان ما تقصده هو ظهور البرنامج في الخلف والـSplash-Screen في الأمام، فيمكنك مثلاً وضع frmMain لتكون هي الـStart up ووضع التالي في Form_Load لـfrmMain:

frmSplash.Show vbModal

وبهذا ستظهر النافذة، ولن تستطيع الانتقال منها إلى النافذة الثانية لأنك كتبت vbModal ومن داخل الـSplash تضبط الـTimer على وقت معين.

هل هذا ما تريده؟؟؟

هذه الجملة خاطئة  :wacko: 


#3

يا أخي اجعل السبلاش سكرين ستارت أب

وضع داخله تايمر

ومن نافذة الخصائص للتايمر خذ الخاصية

Enabled و غيرها إلى True

والخاصية

Interval غيرها إلى القيمة 1000 ليعد البرنامج لمدة ثانية

و 2000 لمدة ثانيتين و 3000 لمدة ثلاث ثواني

وهكذا للمدة التي تريدها

يعني القيمة المكتوبة هي بالميلي ثانية

ثم أكتب الكود التالي للتايمر

frmmain.Show

me.Hide

Timer1.Enabled = False

حيث frmmain اسم النافذة الرئيسية

و السطر الثاني لإخفا السبلاش

والثالث لإيقاف العداد

وهذا كل شي

أتمنى أن يكون طلبك

أخوك جاد

يا أخي اجعل السبلاش سكرين ستارت أب

وضع داخله تايمر

ومن نافذة الخصائص للتايمر خذ الخاصية

Enabled و غيرها إلى True

والخاصية

Interval غيرها إلى القيمة 1000 ليعد البرنامج لمدة ثانية

و 2000 لمدة ثانيتين و 3000 لمدة ثلاث ثواني

وهكذا للمدة التي تريدها

يعني القيمة المكتوبة هي بالميلي ثانية

ثم أكتب الكود التالي للتايمر

frmmain.Show

me.Hide

Timer1.Enabled = False

حيث frmmain اسم النافذة الرئيسية

و السطر الثاني لإخفا السبلاش

والثالث لإيقاف العداد

وهذا كل شي

أتمنى أن يكون طلبك

أخوك جاد

J.A.D

JOUD.NET

jado.kheder@hotmail.com

#4

جزاكم الله خيرا يا اخوة

والف والف شكر لتعاونكم

#5

شكرا جزيلا

انا بالفعل استفدت

مواضيع مشابهة