ActiveDelphi

porter

Ola pessoal, estou imprimindo em uma impressora matricial epson, mas eu nao consigo imprimir Nº, na impressora imprime N│, ou seja um caracter diferente do pretendido, onde que eu configuro para imprimir corretamente ? Estou usando o ALT (167) para imprimir Nº.
Quero imprimir em formato texto.

assignfile(texto,'LPT1');
REWRITE(texto);
Writeln(texto,chr(14) + 'PEDIDO Nº');

Estou usando o Delphi 7.

obrigado.

porter · Enviada: Dom Mai 01, 2011 9:55 am Assunto:

pelo Edit do dos a impressao sai do modo desejado, imprime corretamente, PEDIDO Nº, mas pelo delphi imprime PEDIDO N│

rafa.spimenta · Enviada: Dom Mai 01, 2011 10:57 am Assunto:

Testei aqui usando chr(186) e tb sai errado no DOS.
Essa é uma dúvida que tenho, pq o DOS não imprime os caracteres experiais da atabela ASCII corretamente?
_________________
"Você pode ter todo o dinheiro do mundo, mas há algo que jamais poderá comprar: um dinossauro!"

Meu blog:
http://delphiexpresso.blogspot.com/

rafa.spimenta · Enviada: Seg Mai 02, 2011 12:20 pm Assunto:

Enviei um email para o Luís Gustavo Fabbro, do blog http:\\balaiotecnologico.blogspot.com sobre isso, e a resposta foi a seguinte:

porter · Enviada: Seg Mai 02, 2011 2:45 pm Assunto:

Rafael, vou dar uma olhada nesse artigo indicado e posteriormente estarei postando aqui.

desde ja obrigado.

porter · Enviada: Ter Mai 03, 2011 3:18 pm Assunto:

Lendo essa dica que vc passou, percebi que atravez do do CHCP verifica qual a pagina de codigo ativa e no prompt do ms dos o digitei CHCP 850, diz que a Pagina de codigo ativa : 850.
Tentei imprimir e nao deu certo, pelo Edit eu consigo imprimir Nº, mas pelo Delphi ainda nao consegui imprimir.

maplin16 · Enviada: Qui Mai 05, 2011 10:37 pm Assunto:

Pelo que eu entendi sobre a tabela Ascii no Console é que, ele, usa os primeiros
127 caracteres os outros não funciona corretamente com windows.

Aqui eu consegui imprimir os caracteres especiais no Delphi Console, depois de bolar um função para isso.