FiveTech Software tech support forums

... que esta por default determinada sPrinterName := PRNGETNAME() <<= Esto lo pongo al inicio del programa para tomar la impresora por default SetPrintDefault(sPrinterName) <<= Esto al momento de la impresión, por si pierdo en algún momento la impresora E imprimo en hoja Grande. Con esto, ...

Perdón por no seguir el hilo en el otro mensaje, pensé en hacer otro    SetPrintDefault( AllTrim( oApp:impremito ) )   PRINT oPrn NAME "REMITO" ///PREVIEW   oPrn:SetPage(10)   oPrn:SetCopies(4)   PAGE   oPrn:Cmsay( ...

Magnífico karinha, sustituyendo SetPrintDefault por SetDefaultPrinter se solucionó.

Mira se ayuda: FUNCTION DefaultPrinter()   LOCAL nPrn, nRet   /*   GetPrintDC( GetActiveWindow() )   SetDefaultPrinter( PRNGETNAME() )   */   nRet := PrinterSetUp()   nPrn := PrnGetName()   IF(...

Sigo, en server 2008,2012 con usuarios que no son propietarios del ejecutable tampoco. ¿Me huelo un tema de permisos? El código de SetPrintDefault parece que modifica valores del registro ... function SetPrintDefault( cModel )   local cDriver := StrToken( GetProfString( ...

Hola amigos, estoy usando la función SetPrintDefault para establecer la impresora por defecto en el sistema. Hasta ahora bien pero con Windows 10 y la última actualización no tiene efecto.
¿Alguna solución?
Gracias,

... a la impresora por defecto. He intentado establecerla como impresora por defecto pero no me la cambia ¿Alguna idea de porque no funciona la orden SetPrintDefault() una sesión remota? hago esto    ...   cOldPrinter := GetDefaultPrinter()   SetPrintDefault(cPrinter)   sysrefresh()  ...

Please try it this way:

setprintdefault(cprinter)
PrinterInit()
print oprn name pname to cprinter

SetPrintDefault() just changes the Windows registry values but does not refresh the FWH printer internals

Maybe we should call PrinterInit() from SetPrintDefault() automatically

I got it to work with the following code: setprintdefault(cprinter) oprn:=printbegin(pname,.f.,.f.,cprinter,.t.) oprn:end() print oprn name pname to cprinter Only then does the program successfully change the default printer. If I leave off any ...

I take it all back. setprintdefault() seems to have no effect at all.

Figured it out, setprintdefault(cprinter) is the answer.

... Local cPrinter:=GetPvProfString("Facturacion","IMPRESORA","Microsoft XPS Document Writer", cIniFile) SetPrintDefault(cPrinter) PrnSetPage(9) ///a4 PrnPortrait() ///vertical // PrnLandScape() ///horizontal TPreview():lListViewHide := .T. //PRINT oPrn ...

Mira se no és esto:

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=28059&p=157089&hilit=setprintdefault#p157089

Saludos.

... := PrnGetName() nImprePDF:= AScan(aPrinters, "PDF") cLaImpre :=aPrinters[nImprePDF] cLaImpre := xTrim(cLaImpre) (ltrim+rTrim) SetPrintDefault( cLaImpre ) Saludos y gracias.

... (para retener el nombre al inicio de tu app) luego, con ello podés establecer la impresora por defecto mediante la funcion de FW SetPrintDefault() Sets the specified printer as the default printer. Syntax: SetPrintDefault( <cModel> ) --> nil Parameters: <cModel> ...