Capturar LPT1 para Arquivo

[asimoes]

Carissimos,

Estou convertendo uma aplicação clipper para harbour e preciso testar os relatórios desta aplicação.
O sistema envia para porta lpt1, para não haver disperdicio de papel, gostaria de redirecionar a impressão para arquivo sem mudar o comando lpt1.
Existe alguma solução indicada aqui no forum?

Obs. já tentei lpt2file com aplicação harbour não funciona.

RESOLVI:

#translate SET PRINTER TO LPT1 => SET PRINTER TO "ARQSAIDA.TXT"

[]´s

[jamazevedo]

Eu faço assim:

Código: Selecionar todos

set device to print
set printer to "saida.prn"
@ prow+1 , 000 say "imprime"
@ prow+1 , 000 say "varios comandos de impressao"
eject
set printer to
set device to screen

Após isso um arquivo saida.prn será criado na pasta da aplicação.

[asimoes]

Olá Jamazevedo,

Acontece que a aplicação que foi convertida tem muitos relatórios, procuramos evitar o que você indicou.
O translate que eu fiz resolveu para testar depois será removido.
obs: Esse translate é visto por toda aplicação.