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:46:44
Vinod Parwani
United Creations L.L.C.
Ad-Dulayl, Jordanie
 
 
À
16/07/1997 09:36:30
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00040071
Message ID:
00040213
Vues:
63
>>>>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

As a last option (if all other is failing), you have to recreate the form in foxpro, which can be easily done in report designer...
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform