این الگو نشان میدهد B4A مدرن چطور بدون قفلشدن رابط کاربری حلقه میزند: هر بار pbLoading دو واحد جلو میرود و Sleep 28 میلیثانیه کنترل را به سیستم برمیگرداند تا صفحه نفس بکشد و کاربر بتواند با UI تعامل کند. قفل و بازکردن Enabled دکمه جلوی اجرای دوباره پردازش وسط کار را میگیرد. قدیمیها برای این کار از Timer استفاده میکردند که کد را پراکنده میکرد؛ با Sleep همه منطق در یک Sub خوانا میماند. این نسخه فقط در B4A نسخه ۸ به بالا (با Wait For و Sleep) کار میکند.
بدون نیاز به کتابخانه جانبی (فقط کتابخانههای داخلی B4A)
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۴ شهریور ۱۴۰۵ - ۱۹:۰۰ |
| تعداد بازدید | ۱ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- بدون کتابخانه جانبی
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub btnGo_Click
btnGo.Enabled = False
For i = 0 To 100 Step 2
pbLoading.Progress = i
Sleep(28)
Next
btnGo.Enabled = True
ToastMessageShow("انجام شد", False)
End Sub