تابعنا :

الاثنين، 25 يونيو 2012

عمل شاشة افتتاحية قبل ظهور البرنامج



اليوم في هذا الدرس البسيط سوف أعلمكم أولا كيفية تشغيل شاشة افتتاحه لبرنامجك تعمل لمدة معينة ثم تختفي بعدها شاشة تعمل لأول مره فقط يعمل فيها برنامجك سوف أحاول قدر الإمكان أن اجعل هذا الشرح بسيط أولا نقوم بفتح برنامج فيجوال بيسك كما هي العادة ونقوم باختيار مشروع قياسي stander.exe
 بعد ذلك نقوم بعمل الشاشة الافتتاحية كان نضيف ليبل ونكتب مثلا جملة معينة بعد ذلك نقوم بإضافة أداة التايمر ونقوم بإنشاء واجهة جديدة ونكتب الكود الأتي في حدث التايمر 


Private Sub Timer1_Timer()
Static 
As Integer
If 3 Then
Unload Me
Form2
.Show
Else
1
End 
If
End Sub  


شرح الكود السابق 



في السطر الأول قمنا بالتعريف عن متغير النوع Integer بطريقة التعريف عن طريق الأمر Static للاحتفاظ بقيمة المتغير حتى نهاية البرنامج بعدها وفي السطر الثاني استخدمنا جملة التحقق من قيمة المتغير فإذا كانت = القيمة التي حددنها وهي عدد الثواني التي سوف ينتظرها المستخدم ( على اعتبار إننا سوف نقوم بضبط التايمر لينفذ الحدث بعد كل ثانيه ) بعد ذلك في حال تحقق الشرط يقوم البرنامج بغلق النافذة التي تعمل وهي النافذة الافتتاحية بعدها تشغيل النافذة الثانية وعلى اعتبار ابنها نافذة البرنامج الرئيسية إما في حال عدم تحقق الشرط فيقوم البرنامج بزيادة قيمة المتغير ثم نهاية جملة التحقق ونهاية الحدث بقى كود واحد يجب إضافته وهو 





Private Sub Form_Load()
Timer1.Interval 1000
End Sub  




كود بسيط لضبط سرعة التايمر 



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


البرنامج من دون الشاشة وإذا لم تكن موجودة نقوم بوضعها مع فتح شاشة الترحيب الكود يكون كالأتي 










Private Sub Form_Load()
Dim X As String
GetSetting("Name""Name""Name")
If 
"" Then
Timer1
.Interval 1000
SaveSetting 
"Name""Name""Name""Value"
Else
Unload Me
Form2
.Show
End 
If
End Sub  


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


0 التعليقات:

إرسال تعليق

ما هو رايكم فى المدونة ؟ او يتم الاقتراح لاضافة اشياء اخرى ؟

Related Posts Plugin for WordPress, Blogger...