ayuda en impresion

[PILO]

Hola espero que alguien me ayude en esto
cuando estoy imprimiendo en la clase tprinte pongo los siguiente
Printer:cPRINTERNAME := IMPRESORA
Siendo IMPRESORA una variable con el nombre de la impresora que esta en el
ordenador
y es en la que quiero imprimir.
cuando hago se show del previo de impresion, y doy al boton de selecionar
la impresora en el previo de impresion, me sale la impresora por defecto que
tiene
windows como puedo hacer para que salga la que yo he selecionado o donde la
tengo que poner
para que salga.
Si en la impresra que he selecionado en IMPRESORA, tiene el formato
selecionado A3, me sale por
defecto en el previo con formato A4 de la de por defecto.
¿como debo hacer esto?
los que tengo hecho es los siguiente
Printer:lPreview := .t.
Printer:cJobTitle := "IMPRESION ETIQUETAS CLIENTES"
//Printer:cPORT := IMPREPUERTO
Printer:cPRINTERNAME := IMPRESORA
Printer:nOrientation := VAL(ORIENTACION)
Printer:nPaperSizeType := VAL(TIPOHOJA)
Printer:nCopies := VAL(NUMECOPIAS)
Printer:nDefaultBin := VAL(BANDEJA)
Printer:nColor := VAL(IMPRECOLOR)
Printer:nDuplex := VAL(DOBLECARA)
//Printer:nState := VAL(MPREESTADO)
Printer:StartDoc()
Printer:oCanvas:nMapMode := mmHIMETRICS
WITH OBJECT Printer:oCanvas
en el final
Printer:EndPage()
Printer:EndDoc()
with object Printer:PreviewControl()
:nZoomIndex := 10
:oParent:Show()
end with
Espero vuestra ayuda, gracias.

[jfgimenez]

PILO,
> cuando estoy imprimiendo en la clase tprinte pongo los siguiente
> Printer:cPRINTERNAME := IMPRESORA
> Siendo IMPRESORA una variable con el nombre de la impresora que esta en el
> ordenador
> y es en la que quiero imprimir.
La propiedad cPrinterName es de sólo-lectura. Tienes que seleccionar la
impresora con la propiedad nPrinterIndex. P.ej.:
Printer:nPrinterIndex := AScan( Printer:aPrinterNames, "la impresora que
sea" )
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

[zeasoftware]

Exactamente eso me pasa a mi.--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com

[PILO]

Muchas Gracias
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:[email=48c4ec26@ozsrv2.ozlan.local...]48c4ec26@ozsrv2.ozlan.local...[/email]
> PILO,
>
>> cuando estoy imprimiendo en la clase tprinte pongo los siguiente
>> Printer:cPRINTERNAME := IMPRESORA
>> Siendo IMPRESORA una variable con el nombre de la impresora que esta en
>> el ordenador
>> y es en la que quiero imprimir.
>
> La propiedad cPrinterName es de sólo-lectura. Tienes que seleccionar la
> impresora con la propiedad nPrinterIndex. P.ej.:
>
> Printer:nPrinterIndex := AScan( Printer:aPrinterNames, "la impresora
> que sea" )
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>

[PILO]

"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:[email=48c4ec26@ozsrv2.ozlan.local...]48c4ec26@ozsrv2.ozlan.local...[/email]
> PILO,
>
>> cuando estoy imprimiendo en la clase tprinte pongo los siguiente
>> Printer:cPRINTERNAME := IMPRESORA
>> Siendo IMPRESORA una variable con el nombre de la impresora que esta en
>> el ordenador
>> y es en la que quiero imprimir.
>
> La propiedad cPrinterName es de sólo-lectura. Tienes que seleccionar la
> impresora con la propiedad nPrinterIndex. P.ej.:
>
> Printer:nPrinterIndex := AScan( Printer:aPrinterNames, "la impresora
> que sea" )
Ya he puesto esto, pero cuando se esta visualizando en pantalla y doy
a la opcion de impresora, en selecionar, me sale la impresora
predeterminada.
Como puedo hacer para que ello cambie a la que yo he seleccionado
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>