delphi4arab منتديات دلفي للعرب
كيف انتقل من الفور رقم واحد بشكل اتوماتيكي باستعمال timer - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف انتقل من الفور رقم واحد بشكل اتوماتيكي باستعمال timer (/showthread.php?tid=8148)



كيف انتقل من الفور رقم واحد بشكل اتوماتيكي باستعمال timer - widad-wac - 22-09-2016

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

اخواني الكرام انا بصدد صنع برنامج تسيير مخزن
عندي 23 فورم و عندي الواجهة الرئيسية للبرنامجللبرنامج و هي عبارة ترحيب
كيف انتقل من الفور رقم واحد بشكل اتوماتيكي باستعمال timer ؟
مثلا اعط الأمر للبرنامج الإنتقال الى الفورم رقم 2 بعد مرور 10 ثواني
جزاكم الله كل خير


RE: مساعدة بسيطة لوجه الله - Mr.DOS - 23-09-2016

سلام عليكم

ضع Ttimer على الفورم 1
غير خاصية Enabled للعنصر تيمر الى False
و Interval الى 10000=(10ثواني)


ضع الكود على التيمر دبل كليك 

كود :
procedure TForm1.Timer1Timer(Sender: TObject); begin form10.show; end;

في الحدث OnCreate للفورم 1 قم بتفعيل التيمر 

كود :
procedure TForm1.FormCreate(Sender: TObject); begin timer1.Enabled:=true; end;


تمام ، الان عليك بانهاء تفعيل التيمر 

في الحدث OnShow للفورم 10

كود :
procedure TForm10.FormShow(Sender: TObject); begin form1.Timer1.Enabled:=false; end;