Eu fiz uma rotina para imprimir um Memo. Numa impressora LaserJet
funciona 100%. Se eu seleciono a impressora fiscal (Driver genérico,
somente texto) sai as linhas todas socadas, umas por cima das outras.
Alguém tem alguma idéia ou sugestão ???

  i := 0;
  Linha := 0 ;
  Printer.BeginDoc;

  for i := 0 to mmPreview.Lines.Count div 2 do
  begin
    Printer.Canvas.TextOut(0, Linha, mmPreview.Lines[i]);
    {Font.Height is calculated as -Font.Size * 72 / Font.PixelsPerInch
which returns
     a negative number. So Abs() is applied to the Height to make it a
non-negative
     value}
    Linha := Linha + Abs(Printer.Canvas.Font.Height);

    if (Linha >= Printer.PageHeight) then
      Printer.NewPage;
  end;

  Printer.EndDoc;


--- Em delphi-br@yahoogrupos.com.br, "Alexandre"
<[EMAIL PROTECTED]> escreveu
> Estimado,
> 
> Boa tarde. O grupo AutomacaoTotal trata de vários aspectos relacionados
> a isso. Sobre impressões via rede em equipamento fiscal não via ainda, a
> não ser que outro colega tenha visto. O que já ouvi falar no grupo de
> AutomacaoTotal é de uma solução com terminal server. Pode ser um
> caminho. De qualquer forma , dá uma passadinha por lá:
> 
> http://acbr.sourceforge.net
> http://br.groups.yahoo.com/group/AutomacaoTotal/
> 
> 
> Saudações.
> 
> ---
> []'s
> 
> Alexandre
> msn: [EMAIL PROTECTED]
> 
>  
> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> Em nome de Osmar de Souza Júnior
> Enviada em: sexta-feira, 26 de agosto de 2005 14:39
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Impressora Fiscal - Solução Genérica
> 
> 
> Olá pessoal.
> 
> Tenho achado uma quantidade considerável de rotinas para imprimir nessas
> impressoras fiscais. No entanto, todas que eu achei consideram que a
> impressora é local, ou a impressora é a padrão do windows. Só que eu
> quero poder selecionar qual a impressora, inclusive via rede.
> Aí eu instalei a impressora fiscal como Genérica (Somente texto). Mas
> ela imprime o papel como se fosse A4, não pára quando termina o texto.
> Tem algum jeito de imprimir nessas impressoras via rede, podendo
> escolher a impressora, e sem depender de DLLs específicas de fabricante
> ??
> 
> 
> 
> 
> 
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
>  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>  
> Links do Yahoo! Grupos




-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a