Conocer la cantidad de líneas a imprimir según la impresora

[maron]

No sé si el título es el apropiado. En realidad, lo que necesito hacer es esto:
Al imprimir, selecciono la impresora a la que quiero mandar. Dependiendo de la impresora, cambia la cantidad de líneas que imprime por página. En consecuencia, a veces hace mal el salto de página.
Puedo saber, en tiempo de ejecución, cuántas líneas imprime la impresora? Para así poder leer ese valor y que sea transparente la selección de la impresora?
Espero que el planteo haya sido claro. Gracias desde ya.

[Txoco]

Qué tal?

Yo se que el standard para la orientación vertical es de 66 líneas, pero en la realidad va a depender del tamaño del papel y del tipo de letra.

El objeto Printer (te hablo de VB6) no tiene ninguna propiedad que te diga el número de líneas porque lo considera un objeto gráfico, pero puedes hacer el cálculo con sus propiedades ScaleHeight (alto del area de dibujo) y CurrentY (coordenada vertical del siguiente punto).

Si sólo imprimes texto, puedes hacer la comprobación:

Código:

If Printer.CurrentY + Printer.TextHeight(<texto a imprimir>) > Printer.ScaleHeight Then
    Call Printer.NewPage
End If

Es un poco rudimentaria, pero te sirve como base.

[maron]

El tamaño del papel y el tipo de letra, se los asigno yo, por lo que son iguales para todas las impresoras. Pero voy a intentar con tu sugerencia. Gracias por tu ayuda!