رفتن به مطلب
  • 0

تشخیص جهت کشیدن توسط کاربر


amirsafari

سوال

سلام میخوام توی برنامه بتونم حرکت دست کاربر روی صفحه رو تشخیص بدم و بدونم به کدوم سمت لمس میکنه :scratch_one-s_head:

لطفا راهنمایی کنید 
مرسی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

1 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

سرچ میکردین پیدا میکردین عزیز

Sub Process_Globals
Dim MOVEMENT_THRESHOLD As Int
   MOVEMENT_THRESHOLD = 50dip
End Sub

Sub Globals
	 Dim StartX As Int
End Sub
Sub Activity_Touch (Action As Int, X As Float, Y As Float) 
	Select Action
      Case Activity.ACTION_DOWN
         StartX = X
      Case Activity.ACTION_UP
         If Abs(X - StartX) > MOVEMENT_THRESHOLD Then
            Swipe(X < StartX)
         End If
   End Select

End Sub
Sub Swipe(Left As Boolean)
   If Left Then Msgbox("Left", "") Else Msgbox("Right", "")
End Sub

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...