Trocar impressora com Crystal Reports

[kbelo]

Ola Amigos. ¿Cómo hago para cambiar la impresora con lo Crystal Reports? El ser ése con el TCRW solo él imprime en el estándar
de la impresora.

Ola Amigos. Como faço para trocar a impressora com o Crystal Reports.? Sendo que com a TCRW só imprime na impressora padrão.

[Maurizio]

kbelo

I use

PrinterSetup()
cPrinter := PrnGetName()
cDriver := PrnGetDrive()
cPort := PrnGetPort()
oCrw:SetPrinter32( cDriver, cPrinter, cPort)


Method SetPrinter32( cDriver, cPrinter, cPort) CLASS Crystal32
LOCAL nRet
LOCAL cFarProc := "PESelectPrinter"

cFarProc := GetProcAddress( ::hDll, cFarProc,.T.,_INT,LONG,LPSTR ,LPSTR,LPSTR,LONG)
nRet := CallDll( cFarProc, ::nJobHandle, cDriver , cPrinter , cPort ,0 )

RETURN self


Regards Maurizio