Imprimir contenido TListBox

[rgstuamigo]

Empezado por delphi.com.ar

Si tienes una impresora local, o mappeado el puerto de una impresora remota, y solo quieres imprimir texto sin formato, puedes hacer esto:
Código Delphi [-]MiListBox.Items.SaveToFile('LPT1')

Saludos!

Interesante respuesta , pero tal parece que ami no me funciona , tengo una impresora local, pero al mandar a imprimir con el puerto LPT1, simplemente la aplicacion se congela y no hace nada.

[delphi.com.ar]

Empezado por rgstuamigo

Interesante respuesta , pero tal parece que ami no me funciona , tengo una impresora local, pero al mandar a imprimir con el puerto LPT1, simplemente la aplicacion se congela y no hace nada.

No comprendo porque no funciona, básicamente es lo mismo que imprimir en el puerto a la vieja usanza.

[rgstuamigo]

Empezado por delphi.com.ar

No comprendo porque no funciona, básicamente es lo mismo que imprimir en el puerto a la vieja usanza.

Pues lo he probado amigo Fede, pero no me imprime...Me gustaria saber si tú lo has probado y si te funciona..
Saludos...

[delphi.com.ar]

Digamos.. no lo porbé en el momento que escribí el hilo, pero lo hice infinidad de veces!... En este momento no tengo una impresora física, pero "mappie" el "Microsoft XPS Document Writer" en LPT1 y funcionó sin problemas.

¿Que sistema operativo tienes instalado?

Prueba si te funciona desde la línea comandos:

dir > lpt1

Prueba alguno de estos ejemplos:
Imprimir un archivo de texto
Imprimir una Línea

Saludos!

[rgstuamigo]

Pues te cuento amigo Fede que no me funciona ninguno de esos ejemplos..tal parece algo debo tener mal...como te dije anteriormente la aplicacion se congela e incluso desde la linea de Comando no me hace nada.
Cuando lo hago desde delphi ni si quiera se deja cerrar el formulario, tengo que ir al IDE y terminar la aplicacion Run>Program Reset y a veces me sale el siguiente error ---------------------------

Project1
---------------------------
Insufficient memory for this operation.
---------------------------
Aceptar
---------------------------

Y tal parece que no se deja Resetear ni correr nuevamente pues me sale este otro error

---------------------------
Error
---------------------------
Debugger fatal error during process reset:'Unable to terminate process:Acceso denegado'.Please save you work and
restart Delphi.
---------------------------
OK
---------------------------

Asi que ni modo.. no me queda otra que reiniciar Delphi de nuevo.

Por si las dudas utilizo Windows XP Profesional con el Service Pack 2 y Delphi 7.

Talves alguien que tenga Delphi 7 y windows XP lo pueda probar y nos comenta.
No se si es sólo a mi a quien le pasa esto, por eso te pregunte si lo habias probado, es decir llevar de la teoria a la practica.
Saludos...

[delphi.com.ar]

Empezado por rgstuamigo

...incluso desde la linea de Comando no me hace nada....

Leyendo esto sacaría a Delphi de la disolución, estas seguro que en la configuración de la impresora tienes capturado el puerto LPT1 ?... de ser así buscaría algún problema por el lado de los controladores del dispositivo, o del mismo puerto.

[rgstuamigo]

Empezado por delphi.com.ar

Leyendo esto sacaría a Delphi de la disolución, estas seguro que en la configuración de la impresora tienes capturado el puerto LPT1 ?... de ser así buscaría algún problema por el lado de los controladores del dispositivo, o del mismo puerto.

Jee, jee..en realidad no tenia Capturado el puerto LPT1 ami impresora aunque ya tenia su puerto configurado era un puerto USB (virtual printer port for USB ) que supongo es el que se pone por defecto; lo he cambiado por el LPT1 para hacer la prueba, aunque la aplicacion ya no se congela, pues de todas formas igual no se puede imprimir, tal parece, como dices tú puede ser un problema de Driver..
Por si acaso mi Impresora es una Canon PIXMA IP1700.
Saludos...