Help: any ideas on clearing the input buffer

[Paul Smith]

Hi
Im writting a program (POCKET PC)with a simple calculator style input
using my own system not the pocket pc keyboard.

the problem I have is if I tap 1 I get 111 or 1111 no matter how fast I tap the screen
is there a way to clear the buffer

[Minion]

not sure if there is a command to clear the buffer or not.

But if I was to do soething like that I`d use something like the follwoing -

Code (glbasic) Select Expand

WHILE 1=1

a$=INKEY$()
IF a$<>"" PRINT a$;
SHOWSCREEN
WHILE a$<>""
a$=INKEY$()
WEND

WENDNot so much a keyboard buffer clearer, more a wait until there is no more key presses.


Or have the following as a function, then u can just call it to clear the keys etc

Code (glbasic) Select Expand

// ------------------------------------------------------------- //
// -=#  CLEARKEYS  #=-
// ------------------------------------------------------------- //
FUNCTION ClearKeys:

WHILE a$<>""
a$=INKEY$()
WEND

ENDFUNCTION // CLEARKEYS

[Kitty Hello]

or, if you "tap" the screen, wait for the pen to be released:
WHILE MOUSEAXIS(3); WEND

[Paul Smith]

non of the listed ways worked

So I ended up using MOUSEWAIT
after that the Pocket PC Program worked perfecly
but was no use for the PC

thanks for the Quick reply