Visual Basic - Problema DISTINTO con Impresora Matriz de Punto

Life is soft - evento anual de software empresarial
 
Vista:

Problema DISTINTO con Impresora Matriz de Punto

Publicado por ProgamOK (1 intervención) el 29/10/2005 07:21:10
Hola programadores:

Este foro me ha sido de gran ayuda, y es por eso que recurro a él en este momento. Tengo el siguiente problema: Tengo que imprimir un formulario Horizontal en una Impresora Matriz de Punto Okidata la cual en este momento usa el dirver IBM Proprinter II y para ello uso el Commondialog y el objeto Printer. Envío a imprimir en una impresora inyección de tinta y no Tengo problema alguno, todos los campos encajan perfecto en el formulario. Pero en la matriz de punto, Problemas:

1.- Envío a imprimir y solo imprime en la última linea (horizontalmente) numeros "2" y unas letras "e" y "r" de un tamaño mayor al predefinido.
He aquí parte del codigo que uso para la impresión:

'''''CommonDialog
On Error Resume Next
With CommonDialog1
.DialogTitle = "Seleccionar impresora"
.Flags = cdlPDPrintSetup
.ShowPrinter
End With
Err = 0

'''' configuro impresora
Printer.Orientation = 2
Printer.FontSize = 12
' Tamaño Papel
Printer.PaperSize = vbPRPSUser
Printer.Height = 330
Printer.Width = 215
Printer.ScaleMode = vbCentimeters

''' Parte del codigo de impresion. Son muchas lineas de este tipo:
'Nombre
Printer.CurrentX = 1
Printer.CurrentY = 1.7
Printer.Print Text1.Text
'Direccion
Printer.CurrentX = 1
Printer.CurrentY = 2.7
Printer.Print Text2.Text
''' Etc... etc.. etc...

Printer.EndDoc

Este programa esta funcionando en windows 98.
Espero que alguien sepa y me pueda guiar un poco, ya que estoy bastante liado con esto y aun no logro encontrar la solución. De antemano muchas gracias.

P.D.:Cuando lo pruebo en XP con impresora Inyección de tinta no tengo problemas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder