[firebase-br] OFF- Impressão

[Renato Miranda]

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