Array
(
)

Trocar fonte em matricial durante a impressão

Janete
   - 28 set 2004

Pessoal, estou pesquisando no forum mais até agora nao consegui encontras. É sobre impressão direta na matricial estou fazendo assim:

var
Arq:TextFile;
Begin

AssignFile(Arq,´LPT1´);
ReWrite(Arq);
writeln(Arq,´Texto´);
writeln(Arq,´´);
writeln(Arq,´´);
CloseFile(arq);

Eu consigo trocar a fonte q está imprimindo usando esse tipo de impressão, é q eu precisava as vezes tipo aumentar a fonte ou até trocar e não sei como fazer.


Dopi
   - 28 set 2004

Usando acesso direto a porta matricial, não há como usar as fontes do Windows....

Cada impressora possui um conjunto proprio de fontes e código de comandos para ativa-las... Infelizmente os códigos variam muito.... O mais comum é o padrão EPSON ESC P/2

Exemplo:
chr(15) -> Liga Condensado
chr(18) -> Desliga condensado,

chr(14) -> Expandido (somente uma linha)

chr(12) -> eject form feed (FF)
chr(10) -> Pula de linha (LF)
chr(13) -> Retorno de carro (CR)

Consultando o manual da impressora dá pra descobrir todos os comandos...