Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Credit card swipe
Message
From
04/03/2010 21:47:43
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Miscellaneous
Thread ID:
01451846
Message ID:
01452666
Views:
48
>>>>>>I'm using an edit box to capture the swiped data. Two questions:
>>>>>>
>>>>>>1. I don't want the user to see the edit box. However, if I set visible .f., it will not accept data.
>>>>>>
>>>>>>2. With the edit box, I do not want the user to key in data, except for Escape or perhaps a '1', but otherwise I want nothing to happen if he doesn't follow instructions and keys in other data. How do I do that?
>>>>>>
>>>>>>Thanks,
>>>>>>
>>>>>>Yossi
>>>>>
>>>>>May be you set editbox position to -100, -100 (for example), so user would not see it?
>>>>Thanks. Now how about my 2nd question? :)
>>>
>>>Set the Editbox
>>>
>>>Enabled = .F. and
>>>
>>>DisabledBackColor = DisabledForeColor
>>>
>>>That way he /she cannot type anything and also cannot see anything. If you really need any user input, then use another editbox or textbox for that. More control then over what to use and discard.
>>
>>Bernard:
>>
>>If I disable the edit box, it will not accept the credit card swipe!
>>Also, I do not want to use another text box, since that would force the user to tab over. All I want the user to see is the label saying 'swipe the credit card or press escape to cancel or press '1' to enter credit card data manually'. I want to reject all other input.
>
>Haven't tried, but what about NODEFAULT in InteractiveChange() ?

Your NODEFAULT idea works for keyboard input

BUT I find that it is unpredictable whether the card swipe will fire interactivechange or keypress, so I still don't know how to test for the following in keypress AND interactivechange :
if InputFromSwipe()  <<-- How do I do this
  Allow all characters through
else
  if escape or '1' was pressed
    allow through
  else
    NODEFAULT
  endif
endif
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform