Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printing using generic / text only printer
Message
From
15/03/2009 12:28:44
 
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:
01388210
Views:
43
The reason I'm using REPORT FORM is that I can easily select the font I need. I'm assuming that if iI do not save the printer environment, I can use the frx for any printer and it will print that font.

If I set up the font by send codes to the printer as you suggest, then I will have maintain a database of all my client's printers, will I not?

>>>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.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform