Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Boca Printer using Friendly Ghost Language
Message
De
16/07/2007 17:13:29
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Titre:
Boca Printer using Friendly Ghost Language
Divers
Thread ID:
01240876
Message ID:
01240876
Vues:
172
I need to print to a Boca Ticket Printer (prints movie tickets, ball games, etc) using their Friendly Ghost Language. Does anyone have experience controlling a Boca printer using VFP, and if so, any tips to share?

So far, I am able to print to the printer, but only get the FGL itself to print out, instead of a formatted ticket.
set printer TO NAME  "Boca FGL 22/42 200 DPI"
set device to printer

* bottom left & right
@ 0, 0 SAY "<RC340,0><F9>    Admits"
@ 0, 0 SAY "<RC365,0><F9>     One" 

@ 0, 0 SAY "<RC340,200><F9>  Customer"
@ 0, 0 SAY "<RC365,200><F9>   Receipt" 

@ 0, 0 SAY "<P>"

set device to screen
set printer to 
and I have tried it using a REPORT FORM approach as follows which only prints the contents of the m.cBoca variable:
m.cboca1 = ''
maddr1 = "Test Addr1"
maddr2 = "Test Addr2"
maddr3 = "Test Addr3"

m.cboca = ''
m.cboca = m.cboca + "<RC6,280><F2>" + mshopname + lcline
m.cboca = m.cboca + "<RC28,280><F2>" + maddr1 + lcline
m.cboca = m.cboca + "<RC50,280><F2>" + maddr2 + lcline
m.cboca = m.cboca + "<RC72,280><F2>" + maddr3 + lcline
m.cboca = m.cboca + "<RC95,280><HX175><LT4>" + lcline

* this is a dummy cursor to drive the report
CREATE CURSOR ccursor (cTboca M)
append blank
REPORT FORM PosRboca.frx NOEJECT NOCONSOLE TO PRINTER	
If you have any expereience with this, I'd love to hear of the approach that you have used!
Carsten M. Thode
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform