Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Fonts get changed while Exporting TO PDF
Message
De
10/06/2013 07:13:57
 
Information générale
Forum:
Visual FoxPro
Catégorie:
FRX2Any
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01575935
Message ID:
01575947
Vues:
45
Sir, I have downloaded the latest version only , 4 Days back. I have used the following in My Custompreview.prg but its not working
LOCAL loFile
LOCAL lcFRX2AnyLibrary
LOCAL lcAlias

lcAlias = JUSTSTEM(Report_type)

IF ALLTRIM(UPPER(report_type))="TRIAL.FRX"
LOCAL ABC
ABC="TRIALCHILD"
SELECT 11
USE TRIALCHILD.FRX AGAIN SHARED ALIAS (ABC)
lcFullName = ADDBS(SYS(2023)) + 'TC.FRX'
COPY TO &lcFullName
ENDIF

SELECT 0
cnOUTPUT_SCREEN=1
#DEFINE cnEXCEL_OUTPUT_FULL_PLAIN				3

*--- !!! FRX - ia embedded into EXE report (FRX/FRT files)

USE IN SELECT(lcAlias)
USE &Report_type AGAIN SHARED ALIAS (lcAlias)

*-- Save compiled FRX in a temporary folder

lcReportFullName = ADDBS(SYS(2023)) + 'TEMP.FRX'
*Logofullpath=ADDBS(SYS(2023))+"Logo.bmp"
COPY TO '&lcReportFullName'
*COPY FILE 'Logo.bmp' TO '&logofullpath'

IF !FILE(lcReportFullName)
     =MESSAGEBOX('File ' + lcReportFullName + ' does not exist.', 16, 'Error')
ELSE
	SET CLASSLIB TO FRX2Any
	loFile = CREATEOBJ('FRX2Any.PreviewFile')
	IF TYPE('loFile') = 'O'
*-- Unlock FRX2Any
		loFile.UNLOCK('xxxxxx-xxxxxx-xxxxxx-xxxxxx-xxxxxx-xxxxxx')
		*-- Set up ToolBar settings
*-- If this property is True FRX2Any's Report Previewer ToolBar will be displayed
		loFile.lToolBarDisplay  		 = .T.

*-- If this property is True Find button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFind     		 = .T.

*-- If this property is True Print button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarPrint    		 = .T.

*-- If this property is True Zoom Scale combobox in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarZoom    			 = .T.

*-- If this property is True Save to DOC button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2Word 		 = .F.

*-- If this property is True Save to XLS button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2Excel		 = .T.

*-- If this property is True Save to RTF button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2RTF  		 = .F.

*-- If this property is True Save to HTML button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2HTML 		 = .F.

*-- If this property is True Save to BMP button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2IMAGE   		 = .F.

*-- If this property is True Save to PDF button in FRX2Any's Report Previewer ToolBar will be represented
		loFile.lToolBarFRX2PDF   		 = .T.
		loFile.lIncludeFont 			 = .T.
		loFile.lToolBarFRX2XML   		 = .F.
*-- Specifies FRX2Any's Report Previewer ToolBar vertical position
		loFile.nToolBarPositionTop       = 25

*-- Specifies FRX2Any's Report Previewer ToolBar horizontal position
		loFile.nToolBarPositionLeft      = 5

*-- Specifies FRX2Any's Report Previewer ToolBar Title
		loFile.cPrintPreviewToolBarTitle = "Customizable Preview, toolbar title"

*-- Representing FRX2Any's Report Previewer form Title
		loFile.cPrintPreviewFormTitle    = "Customizable Preview, form title"

*-- Specifies number of the Page that will be displayed first. By default First Page will be displayed
		loFile.nDefaultPageNumber        = 1
*-- Specifies FRX2Any's Report Previewer background color
		loFile.nBackGroundColor          = RGB(75, 75, 75)
*-- Force FRX2Any to display conversion process status
		loFile.lDisplayStatus  = .T.
		*-- Specifies that output file will be displayed after creation
		loFile.nOutPutType = cnOUTPUT_SCREEN
 		loFile.cExportFileName= Lcalias
		loFile.cSaveFolder= ALLTRIM(Reportfolder)
		loFile.SAVE(lcReportFullName)
		*lofile.save(lcfullname)
		loFile.RELEASE()
	ENDIF
ENDIF
>Download latest version of FRX2Any - 12.14.01. and note that loFile.lIncludeFont property is available only for PDF module
Harsh
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform