Page 1 of 1
PDFCreator
Posted: Fri Aug 01, 2014 8:59 pm
by davidObarrio
Estimados....
Alguien tuvo problemas desde Windows 7 con esta sentencia
Code: Select all
oPrn:=PrintBegin(NomArc,.f., ,"PDFCreator",.T.)
Cuando se ejecuta sale directamente a la impresora y NO generar el PDF
gracias
Daivd
Re: PDFCreator
Posted: Mon Aug 04, 2014 12:03 pm
by karinha
Re: PDFCreator
Posted: Mon Aug 04, 2014 8:39 pm
by davidObarrio
Muchas gracias....
Pero sigo con el problema.......
gracias
David
Re: PDFCreator
Posted: Mon Aug 04, 2014 9:52 pm
by davidObarrio
Puede ser que.....
Code: Select all
function SetPrintDefault( cModel )
local cDriver := StrToken( GetProfString( "Devices", cModel, "" ), 1, "," )
local cPort := StrToken( GetProfString( "Devices", cModel, "" ), 2, "," )
WriteProfString( "Windows", "Device", cModel + "," + cDriver + "," + cPort )
return nil
no funcione con Windows 7
David
Re: PDFCreator
Posted: Tue Aug 05, 2014 10:36 am
by Manuel Valdenebro
davidObarrio wrote:
Alguien tuvo problemas desde Windows 7 con esta sentencia
Code: Select all
oPrn:=PrintBegin(NomArc,.f., ,"PDFCreator",.T.)
A mí me funciona bien en Windows 7. ¿No será que tiene incompleta la orden? ¿Porque tienes vacio el tercer parámetro?
Intenta primero incluyendo el previo:
oPrn:=PrintBegin(NomArc, .f., .t.,"PDFCreator",.T.)
y si ves que funciona, es decir, al pulsar el icono de la impresora, sale la ventana del PDFCreator. En caso contrario, comprueba la instalación del propio PDFCreator.
Despues, cambia la sentencia a oPrn:=PrintBegin(NomArc, .f., .f., "PDFCreator", .T.)
Re: PDFCreator
Posted: Tue Aug 05, 2014 11:42 am
by davidObarrio
Muchas gracias por tu repuesta....
pero no me funciona....
la unica forma que sale es poniendo desde el panel de Dispositivo e impresora a PDFCreator como impresora predeterminada....
Puse
y tampoco me lo toma... osea que desde mi aplicativo no pone a como impresora determinada....
gracias nuevamente
David
Re: PDFCreator
Posted: Tue Aug 05, 2014 12:34 pm
by karinha