[firebase-br] OFF- Impressão
Renato Miranda
renato.smiranda em gmail.com
Qui Jan 13 17:48:28 -03 2011
Tudo bem, Levy ?
Se não me angano, algumas matriciais tinham diferenças nesses caracteres de
controle, dependendo do fabricante. O que você usa é o da maioria delas,
como as Epson.
Abaixo alguns comandos que podem ajudar. Comp = comprimido, Norm = normal,
Wide = caracteres grandes, Emph = emphasized (negrito):
{ HP LaserJet II - Aten‡„o: NORMLASER no fim, j d um OVF }
CompHPLaser= #027#038#107#050#083;
NormHPLaser= #027#069;
WideHPLaserIni= #027#069; { igual normal !! }
WideHPLaserFin= #027#069; { igual normal !! }
EnphHPLaserIni= #027#069; { igual normal !! }
EnphHPLaserFim= #027#069; { igual normal !! }
{ Matriciais e maioria das Desk e Ink Jets }
CompMatri= #15;
NormMatri= #18;
WideMatriIni= #14#27#71;
WideMatriFin= #20#27#72;
EnphMatriIni= #27#71;
EnphMatriFim= #27#72;
{ Canon Bubble Jet }
CompCanon= #15;
NormCanon= #18;
WideCanonIni= #14#27#71; { igual matricial ?? }
WideCanonFin= #20#27#72; { igual matricial ?? }
EnphCanonIni= #27#71; { igual matricial ?? }
EnphCanonFim= #27#72; { igual matricial ?? }
Espero que lhe ajude.
Abraços,
RMiranda
Em 13 de janeiro de 2011 16:46, Levy Moreira <levymoreira.ce em gmail.com>escreveu:
> Me desculpem pelo off, mas o pessoal do grupo de delphi não resolveu...
> Preciso imprimir um texto em negrito em uma matricial. Só isso.
> Esse pafecf ta me matando...
> Fiz o seguinte teste:
> var
> F: TextFile
> begin
> AssignFile(F, 'LPT1');
> Rewrite(F);
> PrintLine('Sem negrito');
> PrintLine( #27#71 + 'Negrito pelo amor de deus'+ #27#72);
> CloseFile(F);
> end;
>
> mas ambas linhas são impressas iguais.
> Se puderem me ajuda agradeço
>
> --
> Levy Moreira - Programador
> Sistech Informática - Juazeiro do Norte - CE
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
--
Abraços,
RMiranda
Mais detalhes sobre a lista de discussão lista