problemas com cmsay

Post Reply
lcortesm67
Posts: 10
Joined: Wed Jan 11, 2006 8:07 pm

problemas com cmsay

Post by lcortesm67 »

amigos tengo una impresion con tprinter, y funciona bien, pero........ cuando imprimo columnas con valores numericos, estos se centran en la columan y se ven descuadrados.

oPrn:Cmsay(fila, 12.4, TRANSFORM(Net_Fac,"99,999,999"), oFntPeque)
oPrn:Cmsay(fila, 14.4, TRANSFORM(Exe_Fac,"99,999,999"), oFntPeque)
oPrn:Cmsay(fila, 16.4, TRANSFORM(Iva_Fac,"99,999,999"), oFntPeque)
oPrn:Cmsay(fila, 18.4, TRANSFORM(Tot_Fac,"99,999,999"), oFntPeque)

como alineo los numeros a la derecha ???
manuramos
Posts: 219
Joined: Mon Dec 26, 2005 7:25 pm
Location: Jerez de la Frontera (Spain)

Post by manuramos »

Intenta esto:

oPrn:Cmsay(fila, 12.4, TRANSFORM(Net_Fac,"@B 99,999,999"), oFntPeque)

Si no te funciona, tendras que utilizar algo asÍ:

cDato := TRIM(TRANSFORM(Net_Fac,"99,999,999"))
nVar := oPrn:GetTextWidth(cDat,oFntPeque)
oPrn:Cmsay(fila, 12.4+ancho columna-nVar, cDato,oFntPeque)

Un saludo.
Nos Gusta Programar
Post Reply