Problemas com a quantidade de linhas em mini-impressora

Delphi

29/09/2005

Prezados colegas,

Estou com o seguinte problema: fiz um sistema que irá imprimir um cupom não fiscal, usando uma mini-impressora EPSON TM-U200D (40 colunas) e quando mando imprimir só imprime corretamente 46/47 linhas e começa a imprimir caracteres estranhos.
Já tentei com o driver correto da impressora, já tentei com o driver genérico/somente texto, tentei todas a configurações possívels de papel da impressora e este problema persiste. (na programação estou usando o sistema operacional XP, mas o sistema vai rodar no Win98)

estou usando o seguinte esquema:

Procedure Imprimir ..
Var
T : TextFile
begin
AssignFile(T, ´COM1´);//abre a impressoa
Rewrite(T);
Writeln(´LINHA 1´); // imprimi o texto ...
Writeln(´LINHA 2´); // imprmi o texsto
CloseFile(T);//libera porta
end;

Desde já agradeço a atenção dispensada.
Webes.


Webes

Webes

Curtidas 0
POSTAR