POR FAVOR NECESITO AYUDA
Publicado por ACC (19 intervenciones) el 29/03/2006 23:14:26
Amigos:
Soy novato en esto y estoy realizando una aplicacion la cual en uno de los formularios tengo que imprimir el contenido de una texbox centrado con el objeto printer; se me ocurrio una forma para hacerlo para que todo lo que escriba en la textbox me aparezca centrado; pero como lo que escrito lo paso a codigo: a continuacion les describo la forma:
copiar el text1.text en una variable
repetir mientras existan retornos de carro (chr(13) + chr(10)
imprimir la parte izquierda (con left$ hasta el retorno de carro) con la rutina de centrado (modificando el currentx)
quitar de la cadena desde el principio hasta el retorno de carro incluido
final repetir
imprimir lo que queda en la cadena
Un abrazo a todos....
ACC
Soy novato en esto y estoy realizando una aplicacion la cual en uno de los formularios tengo que imprimir el contenido de una texbox centrado con el objeto printer; se me ocurrio una forma para hacerlo para que todo lo que escriba en la textbox me aparezca centrado; pero como lo que escrito lo paso a codigo: a continuacion les describo la forma:
copiar el text1.text en una variable
repetir mientras existan retornos de carro (chr(13) + chr(10)
imprimir la parte izquierda (con left$ hasta el retorno de carro) con la rutina de centrado (modificando el currentx)
quitar de la cadena desde el principio hasta el retorno de carro incluido
final repetir
imprimir lo que queda en la cadena
Un abrazo a todos....
ACC
Valora esta pregunta
0