bon ca progresse
j'ai appelé SetOnGestureListener , pour le moment avec le pager en parametre et je passe bien dans la routine Gesture_onTouch.
Je vais ensuite essayer en passant un bouton en parametre.
GD.SetOnGestureListener(pager, "Gesture")
Sub Gesture_onTouch(Action As Int, X As Float, Y As Float, MotionEvent As Object) As Boolean
Log("Gesture_onTouch action=" & Action & ", x=" & X & ", y=" & Y & ", ev=" & MotionEvent)
Dim r As Reflector
r.Target = pager 'your_listview
r.RunMethod2("requestDisallowInterceptTouchEvent", False, "java.lang.boolean")
Return False 'True = Handle this touch event, False = Ignore it
End Sub
quand je fais un appui long avec mouvement sur un bouton j'ai les evenement suivants
C'est encourageant car je recupere l'information ACTION_UP
btnevent_Down
btnevent_Up
Gesture_onTouch action=2, x=1494.0008544921875, y=543.656494140625, ev=MotionEvent { action=ACTION_MOVE, id[0]=0, x[0]=1494.0009, y[0]=543.6565, toolType[0]=TOOL_TYPE_FINGER, buttonState=0, metaState=0, flags=0x0, edgeFlags=0x0, pointerCount=1, historySize=5, eventTime=9040319, downTime=9040103, deviceId=1, source=0x1002 }
...
Gesture_onTouch action=1, x=1287.1893310546875, y=546.4761962890625, ev=MotionEvent { action=ACTION_UP, id[0]=0, x[0]=1287.1893, y[0]=546.4762, toolType[0]=TOOL_TYPE_FINGER, buttonState=0, metaState=0, flags=0x0, edgeFlags=0x0, pointerCount=1, historySize=0, eventTime=9040686, downTime=9040103, deviceId=1, source=0x1002 }
Je vais maintenent essayer en passant un bouton en parametre.