SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Juanolo en Viernes 26 de Diciembre de 2003, 23:06
-
Amigos:
Soy nuevo en el foro. Me he inscrito con la esperanza de que alguien me pueda ayudar. Llevo tiempo participando en el foro de LWP, pero para este problema no he encontrado solución.
Desarrollé una aplicación que, entre sus funciones, imprime facturas en una matriz de puntos. La revisé y probé en una Okidata 320 y no tuve problemas. El cliente, sin embargo, tiene Panasonic 1150 (no recuerdo exactamente el modelo)... y todo es confusión. He terminado retirando del código toda propiedad de altura, formatos especiales de letra, etc. con el objeto de evitar errores y tener un desempeño un poco más rápido. Aún hoy, con el programa ya funcionando, en forma al parecer aleatoria a la impresora le da por imprimir con un tipo gigantesco y debe ser apagada y encendida para restablecer sus propiedades iniciales.
Mejoró un poco el desempeño cuando cambié el controlador por uno de IBM proprinter II.
He descubierto que el controlador "Genérico sólo texto" mejora la velocidad. Pero no sé si existe la posibilidad de manipular los tipos o el tamaño de la página (el objeto printer no lo hace).
Quisiera saber:
1° Se puede lograr los niveles de desempeño de las antiguas aplicaciones DOS en programas de facturación, o debo acostumbrarme a la lentitud del pbjeto printer?
2° Tengo el Service Pack 3, puede que aún tenga un Bug que se haya solucionado en uno posterior?
3° A alguien se le ocurre porqué se aumenta el tipo de letra, o cómo puedo evitar que esto ocurra?
Desde ya, mil Gracias!
Salu2.
-
la impresora la utilizas en modo texto o en modo grafico... te recomendaria utilizarla en modo texto porque es mas rapida y es mas compatible con la mayoria de los modelos... para eso tendría que abrir el puerto lpt1...
Si es en modo texto te puedo pasar el procedimiento... saludos
-
Pues lo espero. Gracias!
Y felices Fiestas! :)
-
este lo use hace mucho tiempo con el visual basic 3... pero debe de servir igual para otras versiones
Imprime directamente al puerto lpt1, e una impresora de matriz de puntos en modo texto...
Open "C:\LPT1" For Output As #1
Print #1, Chr$(15); Tab(10); "Totales :"; Tab(84); Format$(GSubT, "#,##0.00");
el tab es para la columna donde quieres imprimir
ejemplo
Print #1, tab(10); "Hola";
Print #1, tab(20); Variable;
espero y te sirva...
-
Gracias!, lo probaré.
Aunque ya pude configurar la impresora, sigue el tema de la velocidad. Y creo que esa forma de imprimir es la más rápida. Gracias otra vez.
Salu2.