توضیح در مورد Action_Down و Action_Move و Action_Up

[arashb4a 23]

سلام

یکی اگه میشه لطف کنه این سه تا رو توضیح بده

من میدونم down و up و move چیه مشکل من اینه که همیشه action_move صدا زده میشه چه انگشتتو از بالا بیاری پایین چه از پایین ببری بالا

درحالی که وقتی از بالا میاری پایین یعنی down در حالی که رویداد move رو صدا میزنه البته اول down رو اجرا میکنه ولی بعدش move رو اجرا میکنه

این مشکل داره یا اینکه من بد متوجه شدم؟؟؟

[Farzad Musavi 576]

سلام

یکی اگه میشه لطف کنه این سه تا رو توضیح بده

من میدونم down و up و move چیه مشکل من اینه که همیشه action_move صدا زده میشه چه انگشتتو از بالا بیاری پایین چه از پایین ببری بالا

درحالی که وقتی از بالا میاری پایین یعنی down در حالی که رویداد move رو صدا میزنه البته اول down رو اجرا میکنه ولی بعدش move رو اجرا میکنه

این مشکل داره یا اینکه من بد متوجه شدم؟؟؟

اگه میدونی move چیه باید بدونی که کلا رو گوشی تاچ بکشی اجرا میشه

[مهران محمودی 778]

درود، خیر اونطور که شما فکر میکنید نیست...

Down : وقتی انگشت رو روی صفحه میذارید این رویداد اجرا میشه (تا وقتی انگشت بر ندارید تو همین حالت میمونه)

Up : وقتی انگشت رو از روی صفحه برمیدارید

Move : وقتی انگشت رو روی صفحه بکشید (جهت کشیده شدن انگشت مهم نیست)

برای درک بهتر به پروژه جدید ایجاد کن و این کدها رو درونش قرار بده تا خودت متوجه بشی:

Sub Globals
Dim lbl1 As Label
End Sub
Sub Activity_Create(FirstTime As Boolean)
lbl1.Initialize("")
lbl1.TextSize = 20
Activity.AddView(lbl1,10dip,10dip,50%x,50%y)
End Sub
Sub Activity_Touch (Action As Int, X As Float, Y As Float)
Select Action
Case Activity.ACTION_DOWN
lbl1.Text = "DOwn"
Case Activity.ACTION_MOVE
lbl1.Text = "MoVe"
Case Activity.ACTION_UP
lbl1.Text = "uP"
End Select
End Sub

[arashb4a 23]

درود، خیر اونطور که شما فکر میکنید نیست...

Down : وقتی انگشت رو روی صفحه میذارید این رویداد اجرا میشه (تا وقتی انگشت بر ندارید تو همین حالت میمونه)

Up : وقتی انگشت رو از روی صفحه برمیدارید

Move : وقتی انگشت رو روی صفحه بکشید (جهت کشیده شدن انگشت مهم نیست)

برای درک بهتر به پروژه جدید ایجاد کن و این کدها رو درونش قرار بده تا خودت متوجه بشی:

Sub Globals
Dim lbl1 As Label
End Sub
Sub Activity_Create(FirstTime As Boolean)
lbl1.Initialize("")
lbl1.TextSize = 20
Activity.AddView(lbl1,10dip,10dip,50%x,50%y)
End Sub
Sub Activity_Touch (Action As Int, X As Float, Y As Float)
Select Action
Case Activity.ACTION_DOWN
lbl1.Text = "DOwn"
Case Activity.ACTION_MOVE
lbl1.Text = "MoVe"
Case Activity.ACTION_UP
lbl1.Text = "uP"
End Select
End Sub

دمت گرم خیلی چیزای گنگی تو ذهنم بود رفعش کردی