Manejar el tamaño de las letras

tomini
16 de Enero del 2004
queria saber si se puede hacer en un informe una función que según la cantidad de datos que se metan en el informe, me disminuya o aumente la fuente de letra para que así me encaje en una plantilla de una factura

Muchas gracias

kinoscar
16 de Enero del 2004
suponiendo que utilices el objeto printer para imprimir se me ocurre que podrias hacerlo mediante un ciclo, pare ello tienes que evaluar con la propiedad textwidth el largo del texto, si mal no recuerdo el resultado tendria que devolver en relacion al tipo y tamaño de la letra y al valor de la propiedad scalemode, si el resultado es mayor a la cantidad de espacio que necesitas que baje el tamaño de la letra. el codigo seria algo asi

text1.text="hoja hoja hoja hoja hoja hoja hoja"
printer.scalemode=6
printer.fontsize=10
do while printer.textwidth(text1.text)>1500
printer.fontsize=printer.fontsize-1
loop
printer.currentx=50
printer.currenty=20
printer.print text1.text

esto es solo una idea y no se si funcionara o no

espero te sirva
suerte