رویداد button

[Abbas Esfahani 0]

من میخواستم یه برنامه بنویسم که وقتی یه button فشرده و نگه داشته میشه یه متغیر یک بشه و وقتی رها میشه اون متغیر صفر بشه. الان رویداد کلیک button رو فعال کردم اما وقتی برنامه اجرا میشه و باتن فشرده میشه اون متغیر یک میشه اما بعد از چند لحظه صفر میشه.

میخواستم بدونم چجوری میشه اون حالت رو ایجاد کرد که تا وقتی که باتن فشرده هست اون متغیر یک بمونه و وقتی رها شد صفر بشه.

[DexterFstone 387]

از دو ساب زیر استفاده کنید

Sub Button1_Down
'وقتی فشرده شد
End sub

Sub Button1_Up
'وقتی رها شد
End sub

 

[محمدرضا شاهپیری 5,494]

در ۱۴۰۱/۴/۲۸ در 17:36، Abbas Esfahani گفته است:

من میخواستم یه برنامه بنویسم که وقتی یه button فشرده و نگه داشته میشه یه متغیر یک بشه و وقتی رها میشه اون متغیر صفر بشه. الان رویداد کلیک button رو فعال کردم اما وقتی برنامه اجرا میشه و باتن فشرده میشه اون متغیر یک میشه اما بعد از چند لحظه صفر میشه.

میخواستم بدونم چجوری میشه اون حالت رو ایجاد کرد که تا وقتی که باتن فشرده هست اون متغیر یک بمونه و وقتی رها شد صفر بشه.

سلام و درود. باید از رویداد تاچ استفاده کنید

به شکل زیر میشه تقریبا

Dim R As Reflector
R.Target=Button1
R.SetOnTouchListener("Button1_Touch")


Sub Button1_Touch(ViewTag As Object, Action As Int, X As Float,Y As Float, Motionevent As Object) As Boolean
   Log("Touched")
End Sub

[DexterFstone 387]

همچنین میتونین از رویداد down و up هم استفاده کنید

[Abbas Esfahani 0]

در ۱۴۰۱/۴/۲۸ در 20:35، محمدرضا شاهپیری گفته است:

سلام و درود. باید از رویداد تاچ استفاده کنید

به شکل زیر میشه تقریبا

Dim R As Reflector
R.Target=Button1
R.SetOnTouchListener("Button1_Touch")


Sub Button1_Touch(ViewTag As Object, Action As Int, X As Float,Y As Float, Motionevent As Object) As Boolean
   Log("Touched")
End Sub

بله خیلی ممنونم . درست کار میکنه . فقط یه ایراد کوچیک دیگه که داره بعد از اینکه دست از روی باتن برداشته میشه بعد از حدود یک ثانیه اون متغیر صفر میشه و بلافاصله این اتفاق نمیوفته

این مشکل رو چجوری میشه حل کرد؟