Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Bar Code Scanners
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00018915
Message ID:
00019403
Views:
53
>>>http://www.microsoft.com/industry/retail_dist/retail_distdev.htm#opos
>>Thanks. I looked it over and boy does it look like it gets real deep real
>>fast... (s)
>
>It's not as bad as those 300 pages look. :-) Once it's installed, this is all you need to open a cash drawer...
>
>
>* Millisecond time resolution
>#DEFINE TIME_HALF 500
>#DEFINE TIME_10 10000
>#DEFINE TIME_5 5000
>#DEFINE BEEP_FREQ 440
>
>loDrawer = CREATEOBJECT('OPOS.CashDrawer')
>loDrawer.Open('InsertNameOfDrawerHere')
>loDrawer.Claim(TIME_HALF)  && For exclusive use -- millisecond parameter
>loDrawer.OpenDrawer()
>loDrawer.WaitForDrawerClose(TIME_10, BEEP_FREQ, TIME_HALF, TIME_5)
>* Start beeping in 10 seconds at 440Hz for half a second with 5 seconds between beeps
>loDrawer.Close()     && We're done
>
>
>All of it is pretty much this simple, once you understand the basic mechanism...

Show Off! (s)

Tom
Tom
--------------------------------
Tom O'Hare
407-299-4268 -- tom@redtile.com -- http://www.redtile.com/
Independent Programmer Using Visual FoxPro, Visual Basic & more...
Operations Manager -- Virtual FoxPro User Group (VFUG)
http://www.vfug.org/ -- tom@vfug.org
President -- Central Florida FoxPro User Group (CFFUG)
http://www.redtile.com/foxpro/
Universal Thread Most Valued Professional (MVP)
http://www.transformation.com/foxpro/
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform