Impressão Trava

Delphi

08/09/2003

Olá Pessoal,
tenho um programa que executa o seguinte comando para impressão:

assignfile(f,´lpt1´);
rewrite(f);
WRITE(F,#2764); // reseta impressora
WRITE(F,2750); // imprime em sextos
WRITE(F,2715); // reduz
WRITE(F,2771); // imprime em negrito
Writeln(f,´T E S T E D E I M P R E S S A O 1´);
WRITE (F,2772); // desativa negrito
Writeln(f,´T E S T E D E I M P R E S S A O 2´);
Writeln(f,´ ´);
WRITE(F,2718);// imprime caracter normal
Writeln(f,´T E S T E D E I M P R E S S A O 4´);
WRITE(F,2712); // ejeta pagina
closefile(f);

estes comandos são executados normalmente em uma impressora canon bjc 250 a jato de tinta, quando vou imprimir em uma canon bjc 1000 ou em uma laser o sistema trava.

Alguem tem alguma idea para me ajudar.


Um abraço a todos.


Eduardo Lara

Eduardo Lara

Curtidas 0

Respostas

4_olho

4_olho

08/09/2003

Como você usa códigos específicos da impressora, é preciso verificar se estes mesmos códigos funcionam em outras ...


GOSTEI 0
Marconi

Marconi

08/09/2003

Estes comandos são ´Esc P´ da Epson, e funcionam em Impressoras Matriciais.

Algumas Jato de Tinta aceitam. As Impressoaras HP DeskJet não aceitam mas tem outros códigos próprios.

Não encontrei nenhuma Laser que aceitasse. Veja no manual da Impressora.

Marconi


GOSTEI 0
POSTAR