Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printing using generic / text only printer
Message
 
 
To
15/03/2009 11:32:01
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Miscellaneous
Thread ID:
01387345
Message ID:
01388199
Views:
42
>>To make a report print as in DOS, I would create a text file and then print the entire file with the command "???", thusly:
>>
>>
>>lcPrinterSetupCodes = ...
>>lcFileInRam = FileToStr("FileOnDisk.txt")
>>??? lcPrinterSetupCodes + lcFileInRam
>>
>>
>>My reporting class does something similar.
>
>Hilmar:
>
>I notice you are using chr(12) to do an eject.
>
>In the following program, the page does *not* eject. Why?
>
>
>SET DEVICE TO file joe.txt
>@ 1,1 say 'page1'
>@ prow()+1, 1 say ' '
>@ prow()+1, 1 say 'txet1'
>
>@ prow()+1, 1 say CHR(12)
>
>@ 1,1 say 'page2'
>@ prow()+1, 1 say ' '
>@ prow()+1, 1 say 'txet2'
>
>SET DEVICE TO screen
>
>
>CREATE CURSOR joecursor  ;
>	(cDetail c(250))
>
>APPEND FROM joe.txt TYPE SDF 
>
>REPORT FORM \posprgs\common\RptLSX NOCONSOLE PREVIEW 
>
>RETURN
>
>
>Thanks,
>
>Yossi

Using chr(12) with REPORT FORM command has no effect. If you you try to output file to printer using ??? it would work.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform