Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Print form properties
Message
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
Print form properties
Miscellaneous
Thread ID:
00232128
Message ID:
00232128
Views:
54
Hi!

I spent ~2,5 h. trying to solve my "print problem".
Let's me describe my problem first:

I have a form with 2 additional properties: Title and Message and I want to print the content of these properties as a Statistics report with some formatting (different fonts, add datetime...). Sounds easy, aren't? But I try:

*!* Local lcDevice
*!* lcDevice=SYS(101) && Return Current device
*!* IF PrintStatus()
*!* SET DEVICE TO Printer
*!* SET PRINTER FONT 'Courier', 12 STYLE 'I'
*!* @ 2, 35 SAY Datetime()
*!* SET PRINTER FONT 'Courier', 16 STYLE 'BI'
*!* @ 4, 5 SAY THISFORM.Title
*!* SET PRINTER FONT 'Courier', 10 STYLE 'N'
*!* @ 6,5 SAY THISFORM.MESSAGE
*!* ENDIF
*!* SET DEVICE TO &lcDevice

And nothing goes to printer for a long time (Our printer is a network printer).

Try this:

cTitle=ThisForm.Title
cMessage=ThisForm.Message
REPORT FORM Statistics NOCONSOLE NOEJECT

Still nothing goes to printer. And I even had an additional problem - I can not create a report without database, so I put some database in Report DE.

Another weird behaviour with this form: tooltiptext and statusbartext doesn't display for my buttons.I positioned all controls in form Init method. Could this cause this problem?


Thanks in advance
If it's not broken, fix it until it is.


My Blog
Next
Reply
Map
View

Click here to load this message in the networking platform