Page 1 of 1
Crystal Report - Parametros de Impresión
Posted: Thu May 14, 2009 6:07 am
by danielr cyberia®
Saludos Cordiales Colegas!!!
Alguien ha hecho algo con la clase de Tom Groeger (TCRW.PRG) para pasar parametros de impresion como numero de copias, seleccionar impresora por defecto, etc.??
O si alguien sabe del Crystal Report 8 Report Desinger Component (RDC) que es un SDK
Saluddos y Exitos
Daniel Rivas
Re: Crystal Report - Parametros de Impresión
Posted: Thu May 14, 2009 8:10 pm
by ronaldo
No seu PRG coloque apos (PEOpenPrintJob )
PrinterSetup()
cPrinter := PrnGetName()
cDriver := PrnGetDrive()
cPort := PrnGetPort()
oCrw:SetPrinter32( cDriver, cPrinter, cPort)
No tCRW.PRg coloque isto:
MESSAGE SetPrinter32 METHOD SetPrinter32_
+
Method SetPrinter32_( cDriver, cPrinter, cPort)
LOCAL nRet
LOCAL cFarProc := "PESelectPrinter"
cFarProc := GetProcAdd( ::hDll, cFarProc,.T.,_INT,LONG,LPSTR ,LPSTR,LPSTR,LONG)
nRet := CallDll( cFarProc, ::nJobHandle, cDriver , cPrinter , cPort ,0 )
/* Coloque isto antes do imprimicrystal()
PrinterSetup()
cPrinter := PrnGetName()
cDriver := PrnGetDrive()
cPort := PrnGetPort()
Memvar->oCrw:SetPrinter32( cDriver, cPrinter, cPort)
*/
RETURN self
Re: Crystal Report - Parametros de Impresión
Posted: Thu May 14, 2009 11:42 pm
by danielr cyberia®
Saludos Cordiales Ronaldo!!!
Gracias por tu respuesta, estare probando... gracias..
Saludos y Exitos
Daniel Rivas