PDA

View Full Version : Impressão em PDF



Benedito
10-Sep-2019, 10:23 AM
Boa tarde Pessoal,


Tenho um Relatório Gerado no Winprint, gostaria de EXPORTAR este relatório para PDF, alguem pode me dar uma dica de como fazer isto? Um exemplo seria benvindo...

Queiroz
10-Sep-2019, 01:14 PM
Boa tarde!

O modo mais simples é instalar uma impressora PDF e imprimir na mesma.

Queiroz

Samuel Pizarro
10-Sep-2019, 02:21 PM
+1

Queiroz
10-Sep-2019, 03:59 PM
Oi, achei um código, precisa testar



Procedure DoPrintToFile String sFile
String sDriver
String sDevice
String sPort
Integer iFlags

// Guarda padrão
Get DFGetCurrentDriver of WinPrintID to sDriver
Get DFGetCurrentDevice of WinPrintID to sDevice
Get DFGetCurrentPort of WinPrintID to sPort
Get DFGetPrintDialogFlags of WinPrintID to iFlags
Send DFSetSpecPrintFlag to WinPrintID DF_PRINTTOFILE
Send DFSelectPrinter to WinprintID "WinSpool" "PDF995" sFile False
Send DFPrintDoc to WinPrintID
Send DFPrintFlags to WinPrintID iFlags

// Volta padrão
Send DFSelectPrinter to WinprintID sDriver sDevice sPort True
End_Procedure


Depois usa



Send DoPrintToFile "C:\TESTE.pdf"



Não garanto que funcione

Queiroz