Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
OPOS and VFP
Message
 
 
To
17/04/2002 09:32:43
General information
Forum:
Visual FoxPro
Category:
Third party products
Title:
Miscellaneous
Thread ID:
00645861
Message ID:
00645899
Views:
11
>Hello.
>
>Does anyone know how to print Barcode with OPOS and thermal receipt printer?
>
>Thanks.

For an Epson TM-T88II or TM-T88III, I use:
WITH This.oleOpos
   lnRetVal = .Open(lcOposName)
   if lnRetVal <> 0
      return .f.
   endif
   do while not .Claimed
      .Claim(100)
   enddo
   IF .ResultCode = 0
      .DeviceEnabled = .T.
      .AsyncMode = .F.
      .PrintBarCode(2, tcString, 108, 80, 250, -2, -13)
   ENDIF
   .Close()
ENDWITH
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform