Image shows up on preview, but doesn't print

[jstmbt]

I have a report that displays a large jpeg file. When I run the report everything looks good in the Preview window. However, the image does not print on the document. Is the image size too big?

 

[TSWA]

Hello, some times I had similar condition when send data to Printer Preview and then to Printer, in my case, the problem was the printer Driver(when you create new report, VFP use your default printer Driver from Windows and move it to the Reportname.FRX file), when you install the .EXE on another computer and it has different printer defined, it send blank page or send the Report to the Printer defined on the .FRX file(if you are in Network). I found solution using technique from Tek-Tips Ramani Procedure. I use always these lines:
1. Open the Report Files using USE REPORTNAME.FRX
2. Execute
REPLACE Expr WITH MLINE(Expr,ATLINE("ORIENTATION",Expr)), ;
Tag WITH "", Tag2 WITH ""
3. Close the Report File

Additional, I am sending the Complete Procedure

**********************************************************
** PROCEDURE TO REMOVE PRINTER DRIVER INFO FROM FRX FILES.
**********************************************************
** by Subramanian.G (ramani)
** FoxAcc Software
** ramani_g@yahoo.com
** Last modified : 11 October, 2002
** modified : 27 February, 2003
** ORIENATION preserved in Reports
** provided as freeware
**********************************************************
** How to use ....
** 1. Copy the setfrx routine as given below
** 2. Open up your project in your project manager
** 3. Run the programme by DO setfrx from the command window
** OR in the command window enter =SETFRX()
** 4. All the open projects Report Files are involved.
**********************************************************
** PROCEDURE setfrx

LOCAL cRptFile, i, p

FOR p = 1 TO application.Projects.Count
FOR i = 1 TO application.Projects(p).Files.Count
cRptFile = application.Projects(p).Files(i).NAME
IF UPPER(JUSTEXT(cRptFile)) = "FRX"
WAIT WINDOW cRptFile && add NOWAIT if desired
USE (cRptFile)
LOCATE
** REPLACE Expr WITH "", Tag WITH "", Tag2 WITH ""
** Above line releases and following inserted
** to preserve the Report ORIENTATION
REPLACE Expr WITH ;
MLINE(Expr,ATLINE("ORIENTATION",Expr)), ;
Tag WITH "", Tag2 WITH ""
USE
ENDIF
ENDFOR
ENDFOR
RETURN



Best Regards from Panama,

Marlon

 

[TSWA]

Hello Again, I found this article about Reports.

http://www.ml-consult.demon.co.uk/foxst-12.htm

Best Regards from Panama,

Marlon