centrar texto en tickets térmicos
Posted: Fri Jun 14, 2019 2:54 pm
Buenos dias amigos,
Uso esta función para tratar de centrar texto en la impresión de tickets térmicos:
Pero no me queda bien:
¿ alguno tiene alguna función para realizar esto ?
Agradezco de antemano su valiosa ayuda.
Cordiales saludos,
Uso esta función para tratar de centrar texto en la impresión de tickets térmicos:
Code: Select all
*>----------------------------------------------------------------------<*
*>----------------------------------------------------------------------<*
*>----------------------------------------------------------------------<*
FUNC ColCentra(cQueText)
LOCAL nLenText , nDotText , nDotInic
cQueText := ALLTRIM(cQueText)
nLenText := LEN( cQueText )
nDotText := nLenText
nDotInic := INT( (70 - nDotText) / 2 )
RETURN( nDotInic )
¿ alguno tiene alguna función para realizar esto ?
Agradezco de antemano su valiosa ayuda.
Cordiales saludos,