مهدی ایزدی 9,203 ارسال شده در 11 فروردین، ۱۳۹۵ اشتراک گذاری ارسال شده در 11 فروردین، ۱۳۹۵ چندین روش برای اعمال محدودیت در حداکثر کارکتر مجاز در EditText وجود دارد یکی از ساده ترین روش ها استفاده از کتابخانه IME هست Sub Globals Dim ime1 As IME Private EditText1 As EditText End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("Layout1") ime1.Initialize("ime1") ime1.SetLengthFilter(EditText1,10) End Sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
مهدی ایزدی 9,203 ارسال شده در 11 فروردین، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 11 فروردین، ۱۳۹۵ روش دیگه ای که وجود داره به این صورت میتونیم عمل کنیم و نیاز به کتابخانه ی خاصی هم نداره : Sub EditText1_TextChanged (Old As String, New As String) If New.Length >= 10 Then EditText1.Text = Old ToastMessageShow("تعداد کارکتر مجاز شما برای وارد کردن به تمام رسید",True) End If End Sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.