کد یک تایمر به نام tmrMain میسازد که هر ۱.۵ ثانیه (1500 میلیثانیه) یک بار رویداد Tick را اجرا میکند و شمارنده را از 57 یکییکی کم میکند تا به صفر برسد؛ آنجا تایمر خودش را خاموش میکند و پیام پایان زمان نمایش داده میشود. این الگو پایه تایمر آزمون، کد تخفیف زماندار و بازیهای زماندار است. متغیر counter چون بین رویدادها باید زنده بماند در Globals تعریف شده و تایمر در Process_Globals ساخته میشود.
بدون نیاز به کتابخانه جانبی (فقط کتابخانههای داخلی B4A)
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۵ شهریور ۱۴۰۵ - ۱۰:۰۰ |
| تعداد بازدید | ۲ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- بدون کتابخانه جانبی
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub Process_Globals
Private tmrMain As Timer
End Sub
Sub Globals
Private counter As Int = 57
End Sub
Sub Activity_Create(FirstTime As Boolean)
' تایمر با فاصله 1500 میلیثانیه
tmrMain.Initialize("tmrMain", 1500)
tmrMain.Enabled = True
End Sub
Sub tmrMain_Tick
counter = counter - 1
lblResult.Text = "زمان باقیمانده: " & counter
If counter = 0 Then
tmrMain.Enabled = False
ToastMessageShow("زمان تمام شد!", True)
End If
End Sub