Prevent retrigger of screen touch

[enonod]

Holding the finger on the screen too long causes retrigger of this Touch code.
Can I do anything to accept only the first triggering please?
This acts a bit like the PC keyboard queue.
[Edit] Is there a queue I can empty at some point in the code?

Sub pnl_Touch(Action As Int, X As Float, Y As Float)
Dim col,row As Byte
   If Action=0
      col=X/(kCellwh+1) : row=Y/(kCellwh+1)
      ...

   End If
End Sub

 

[enonod]

Seems that changing Action 0 Down to Action 1 Up has cured the problem, if anybody else experiences it.

 

[Erel]

Note that it is better to use Activity.ACTION_DOWN (0), ACTION_UP (1) or ACTION_MOVE (2).

 

[enonod]

Thank you for that advice Erel.
Unfortunately what I thought was a solution was not.
I need help here. Whatever code runs as a result of the Touch runs multiple times, randomly, and is definitely due to recalling the Touch event due to either finger bounce or something.
I need a way to lock the Touch event until it is again required or something.
Can you help please?

 

[Erel]

You can add a global flag variable named IgnoreEvent. Set it to True in the Touch event:

Sub pnl_Touch(...)
 If IgnoreEvent Then Return
 IgnoreEvent = True
 ...

Later when you want to process new events you should set it to false.

 

[enonod]

Thank you Erel, and I apologise because it should have been obvious to me.
I think I was blinded by the fact that this was an event, which of course makes no difference.