Tamaño de Hoja con TPrinter...

Tamaño de Hoja con TPrinter...

Postby Carlos Sincuir » Sun Mar 05, 2006 3:22 pm

Hola a todos.
Llevo ya varios días tratando de controlar el tamaño de la hoja de impresión con TPrinter, el problema es que tengo que imprimir una hoja tamaño legal en horizontal (landscape) y lo que estoy haciendo es:


///Tamano de Impresora
////// Ancho, Alto
PrnSetSize( 35000, 21500 )

oPrn := PrintBegin( "Prueva", , .t. )
oPrn:SetLandscape()

....y mas codigo de impresion, pero no me respeta el tamaño, siempre me toma el tamaño carta de la hoja, y lo que he visto es la TReport si me cambia los tamaños de la hoja.
He cambiado la posicion del PrnSetSize y SetLandscape, pero igual no funciona.

oPrn := PrintBegin( "Prueva", , .t. )
oPrn:SetLandscape()
PrnSetSize( 35000, 21500 )


Alguien puede ayudarme por favor. Gracias y saludos.

Carlos Sincuir
Carlos Sincuir
 
Posts: 38
Joined: Mon Nov 28, 2005 2:10 pm

Re: Tamaño de Hoja con TPrinter...

Postby wmormar » Mon Mar 06, 2006 2:55 am

Carlos Sincuir wrote:Hola a todos.
Llevo ya varios días tratando de controlar el tamaño de la hoja de impresión con TPrinter, el problema es que tengo que imprimir una hoja tamaño legal en horizontal (landscape) y lo que estoy haciendo es:


///Tamano de Impresora
////// Ancho, Alto
PrnSetSize( 35000, 21500 )

oPrn := PrintBegin( "Prueva", , .t. )
oPrn:SetLandscape()

....y mas codigo de impresion, pero no me respeta el tamaño, siempre me toma el tamaño carta de la hoja, y lo que he visto es la TReport si me cambia los tamaños de la hoja.
He cambiado la posicion del PrnSetSize y SetLandscape, pero igual no funciona.

oPrn := PrintBegin( "Prueva", , .t. )
oPrn:SetLandscape()
PrnSetSize( 35000, 21500 )


Alguien puede ayudarme por favor. Gracias y saludos.

Carlos Sincuir


oPrn:SetPage(9) // A4

Esto es parte de la clase PRINTER de fwh
DMPAPER_LETTER 1 // Letter 8 1/2 x 11 in
DMPAPER_LETTERSMALL 2 // Letter Small 8 1/2 x 11 in
DMPAPER_TABLOID 3 // Tabloid 11 x 17 in
DMPAPER_LEDGER 4 // Ledger 17 x 11 in
DMPAPER_LEGAL 5 // Legal 8 1/2 x 14 in
DMPAPER_STATEMENT 6 // Statement 5 1/2 x 8 1/2 in
DMPAPER_EXECUTIVE 7 // Executive 7 1/4 x 10 1/2 in
DMPAPER_A3 8 // A3 297 x 420 mm
DMPAPER_A4 9 // A4 210 x 297 mm
DMPAPER_A4SMALL 10 // A4 Small 210 x 297 mm
DMPAPER_A5 11 // A5 148 x 210 mm
DMPAPER_B4 12 // B4 250 x 354
DMPAPER_B5 13 // B5 182 x 257 mm
DMPAPER_FOLIO 14 // Folio 8 1/2 x 13 in
DMPAPER_QUARTO 15 // Quarto 215 x 275 mm
DMPAPER_10X14 16 // 10x14 in
DMPAPER_11X17 17 // 11x17 in
DMPAPER_NOTE 18 // Note 8 1/2 x 11 in
DMPAPER_ENV_9 19 // Envelope #9 3 7/8 x 8 7/8
DMPAPER_ENV_10 20 // Envelope #10 4 1/8 x 9 1/2
DMPAPER_ENV_11 21 // Envelope #11 4 1/2 x 10 3/8
DMPAPER_ENV_12 22 // Envelope #12 4 \276 x 11
DMPAPER_ENV_14 23 // Envelope #14 5 x 11 1/2
DMPAPER_CSHEET 24 // C size sheet
DMPAPER_DSHEET 25 // D size sheet
DMPAPER_ESHEET 26 // E size sheet
DMPAPER_ENV_DL 27 // Envelope DL 110 x 220mm
DMPAPER_ENV_C5 28 // Envelope C5 162 x 229 mm
DMPAPER_ENV_C3 29 // Envelope C3 324 x 458 mm
DMPAPER_ENV_C4 30 // Envelope C4 229 x 324 mm
DMPAPER_ENV_C6 31 // Envelope C6 114 x 162 mm
DMPAPER_ENV_C65 32 // Envelope C65 114 x 229 mm
DMPAPER_ENV_B4 33 // Envelope B4 250 x 353 mm
DMPAPER_ENV_B5 34 // Envelope B5 176 x 250 mm
DMPAPER_ENV_B6 35 // Envelope B6 176 x 125 mm
DMPAPER_ENV_ITALY 36 // Envelope 110 x 230 mm
DMPAPER_ENV_MONARCH 37 // Envelope Monarch 3.875 x 7.5 in
DMPAPER_ENV_PERSONAL 38 // 6 3/4 Envelope 3 5/8 x 6 1/2 in
DMPAPER_FANFOLD_US 39 // US Std Fanfold 14 7/8 x 11 in
DMPAPER_FANFOLD_STD_GERMAN 40 // German Std Fanfold 8 1/2 x 12 in
DMPAPER_FANFOLD_LGL_GERMAN 41 // German Legal Fanfold 8 1/2 x 13 in
William, Morales
Saludos

méxico.sureste
User avatar
wmormar
 
Posts: 1074
Joined: Fri Oct 07, 2005 10:41 pm
Location: México

Postby Carlos Sincuir » Mon Mar 06, 2006 12:43 pm

Gracias William, lo pruebo y te comento.

Carlos Sincuir
Carlos Sincuir
 
Posts: 38
Joined: Mon Nov 28, 2005 2:10 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 136 guests