Hi Dennis,

that's why you need some kind of handler-method, which will handles all different kinds of
input through your buttons or whatever control you use.

This is how I handle a numerich field. But note that it's only a small part üf the routine.

CASE thisform.cactivefield = "txtmenge"
   IF cmdvalue $ "0123456789-" 
       IF cmdvalue == "-" 
           IF AT("-",thisform.cValStore) > 0
               thisform.cValStore = Strtran(thisform.cValstore,"-","")
           Else
               thisform.cValStore = cmdvalue + thisform.cValstore  
           Endif   
       Else
            thisform.cValStore = thisform.cValstore + cmdvalue
       Endif   
       thisform.txtpad.txtmenge.value = VAL(thisform.cValstore)		
    Endif

Best regards

Thomas