... text en base a la oFont (de oPrinter) Útil per poder justificar amb tipus de lletra proporcional. És igual al METHOD AnchoMayor( cText,oFont ) de UTILPRN.PRG * Canviat nom de METHOD MEMO (original de la clase) a METHOD MEMO_20011212 + Afegit nou METHOD MEMO per indicar si es vol justificar el ...
... or less): ndummyaltura := ( ::oPrn:CmVertPhySize() / 2 ) + ( ::oPrn:CmtrGetTextWidth( AllTrim( ::oTDbfDatAmp:REGMER ), ::oFnt_Arial6V ) / 2 ) UTILPRN ::oUtil ndummyaltura, 0.5 ; SAY AllTrim(::oTDbfDatAmp:REGMER) FONT ::oFnt_Arial6V COLOR CLR_BLACK I want to center the text at half height of ...
... or less): ndummyaltura := ( ::oPrn:CmVertPhySize() / 2 ) + ( ::oPrn:CmtrGetTextWidth( AllTrim( ::oTDbfDatAmp:REGMER ), ::oFnt_Arial6V ) / 2 ) UTILPRN ::oUtil ndummyaltura, 0.5 ; SAY AllTrim(::oTDbfDatAmp:REGMER) FONT ::oFnt_Arial6V COLOR CLR_BLACK I want to center the text at half height of ...
... & (Dario & Dario), // También probé con chr(38) ... No lo puedo imprimir, me imprime _ (linea baja) Saludos Gracias (Usando la utilidad Utilprn de TheFull no tenía problema, pero estoy tratando de dejar de usar utilidades de terceros) Ruben Dario Fernandez
... caso, si han tenido problemas o errores como estos: Stack Calls =========== Called from: => ABS( 0 ) Called from: c:\pruebas\mundial_2018\bin\Utilprn.prg => ROUNDRECT( 0 ) Called from: c:\pruebas\mundial_2018\bin\Utilprn.prg => TUTILPRN:BOX( 0 ) Called from: c:\pruebas\mundial_2018\bin\Utilprn.prg ...
Olá, Utilizo a TImprime e a UtilPrn, ótimas classes. Para gerar código de barras com elas e a barlib do caetano, faço assim: ::Salto() aCoord := ::oPrn:Cmtr2Pix( ::nLinea, 1.00 ) INT25( aCoord[ 1 ], aCoord[2], AllTrim( cCodigo_Barra ), ...