PDA

View Full Version : چگونه زمان يك تايمر را به يك ساهت يا دو ساعت تغيير دهيم



ra0661
سه شنبه 11 بهمن 1390, 16:58 عصر
دوستان چگونه ميتوان يه تايمر رو ي يه فرم در vb6 گذاشت كه بعد از مثلا يك ساعت يا بيشر فعال بشه آيا ميشه دوستان

IamOverlord
سه شنبه 11 بهمن 1390, 17:04 عصر
خوب می تونید یه Timer بذارید که چک کنه 1 ساعت بعد شده یا نه،
قبلش باید زمان رو ذخیره کنید،
اگر هم دید 1 ساعت بعد شده، Timer2 رو فعال کنه.
برای فعال کردن Timer می تونید به Interval اش مقدار مثبت بدید یا Enabled اش رو True کنید.

bobrus
سه شنبه 11 بهمن 1390, 18:06 عصر
روش اول
می تونی یه متغییر از نوع استاتیک تعریف کنی بعد اینتر ول تایمرت رو روی 60000 تنظیم می کنی که تقریبا هر یک دقیقه یکبار فراخونی بشه و بعد به این متغیر استاتیکت یکی اضافه می کنی و در نهایت چک می کنی اگه 60 بار شده بود یعنی یک ساعت شده
روش دوم
یه کامپوننت هست به نام large timer که فکر کنم mbt925 نوشته که برحسب دقیقه کار می کنه می تونی از اون برای اینکار استفاده کنی

محسن واژدی
سه شنبه 11 بهمن 1390, 23:36 عصر
سلام
کد زیر را هم بررسی کنید:


Private Sub Timer1_Timer()
Static iDelay%
iDelay% = iDelay% + 1
Caption = iDelay%
If iDelay% >= (2 * 3600) Then '2*3600 = 2 hour
iDelay% = 0
MsgBox "Hi,", vbInformation
End If
End Sub

interval تایمر را هم بر روی 1000ms قرار بدین
موفق باشید

ra0661
پنج شنبه 13 بهمن 1390, 17:20 عصر
دوستا راه بهتري نيست كه بتونه اين كار را بكنه يعني اصلا بجز تايمر تو vb6 هيچ چيز ديگه نيست كه يعد يه ساعت يا بيشتر شروع بكار كنه برنامه

محسن واژدی
پنج شنبه 13 بهمن 1390, 18:29 عصر
سلام
به همان صورتیکه عرض شد امکان پذیر است

موفق باشید