Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Vfp50 - Do you know about ??CHR(27)+'*p0Y'
Message
De
16/07/1997 09:36:30
 
 
À
16/07/1997 07:00:37
Vinod Parwani
United Creations L.L.C.
Ad-Dulayl, Jordanie
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00040071
Message ID:
00040210
Vues:
60
>>>thanks Jim for answering.. I can not use the Generic Text printer driver, I must
>>>use the HP driver. Let me tell you what I am trying to do...
>>>I am trying to open an .frm file and stuff it will DATA from a table
>>>and print it out. Both the FRM and the DATA needs to print out at the
>>>same time. Let me show you my code:
>>>
>>>* for HP III/IV
>>>m.brksz=1000
>>>m.jfile=FOPEN('myformfile.frm')
>>>m.sz = FSEEK(m.jfile,0,2)
>>>=FSEEK(m.jfile,0)
>>>m.ct=(m.sz/m.brksz)+1
>>>FOR xxx = 1 TO m.ct
>>> l_string=FREAD(m.jfile,m.brksz)
>>> ??? l_string
>>> ENDFOR
>>>=FCLOSE(m.jfile)
>>>
>>>SET PRINTER ON
>>>SET CONSOLE OFF
>>>SET TALK OFF
>>>?? CHR(27)+'(10U'+CHR(27)+'(s0p12.00h10.0v0s0b3T'
>>>?? CHR(27)+'*p0X'
>>>?? CHR(27)+'*p0Y'
>>>=xy_offset(150,812)
>>>?? 'test by rob'
>>>?? CHR(27)+'E'
>>>SET CONSOLE ON
>>>SET PRINTER OFF
>>>
>>>
>>>FUNCTION xy_offset
>>>PARAMETER nx,ny
>>>PRIVATE x,y
>>> xoffset=0
>>> yoffset=0
>>> x=STR(nx+xoffset)
>>> y=STR(ny+yoffset)
>>> ?? CHR(27)+'*p'+ALLTRIM(x)+'X'
>>> ?? CHR(27)+'*p'+ALLTRIM(y)+'Y'
>>>RETURN
>>>You are right, it works great in DOS, but I need to it work in vfp50 in win95.
>>>any ideas?
>>
>>Rob, check out the ??? (3 question marks) command which tells the printer "this is a printer code" instead of the ? and ?? commands which say "Print this stuff"
>>
>>HTH
>>Barbara
>
>Hi Robert, you can try one more thing but I'm not sure it will work or not, modify the above procedure and try to redirect the output in a file and then try to print the file through "type " command..

thanks Vinod... that did not work.. I think Jim Booth said it when he told me
that I needed to send code to the print manager instead of the printer.
I just do not know where to start...rob
Robert Keith
Independent Developer
San Antonio, Texas
E-mail address:
rebelrob1@yahoo.com
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform