E ae Eduardo, Conversamos na semana passada sobre o RSPrint, estou com ele instalado aqui, mas não tive tempo de fuçar nele ainda. E como disse pro Rubem, pra usar ele tenho que mexer em toda a rotina que tenho hoje, e que está funcionando legal. Vou fazer uns testes com esse RSPrint, e se não tiver jeito com o JLPSay, vou partir pra ele.
Valeu pela (re) dica. [] Andrei Em 03/04/08, Eduardo Silva dos Santos<[EMAIL PROTECTED]> escreveu: > Usa o RsPrint, é Free e tem um Preview ótimo, nada de TMemo. > > Em 03/04/08, Rubem Nascimento da Rocha <[EMAIL PROTECTED]> escreveu: > > > > > > > > > Confesso que nunca ouvi falar desse componente. Quem é o fabricante dele? > > Onde tem pra baixar a demonstração do mesmo? Quanto à visualização, isto > > quer dizer que seu bloco de impressão não consegue ser visto em TMemo em > > função de ele reconhecer no caracter nulo ('#0') uma espécie de fim de > > texto. TRichEdit não consegue visualizar isso pq o conteúdo de um RichText > > segue um padrão de marcações(tags) inerentes ao padrão RTF. Pode esquecer > > RichText. > > > > A sugestão bem simples seria criar blocos diferenciados, um para impressão > > e outro para visualização sem o caracter nulo ('#0')! Não conheço este > > componente, mas deduzo eu que ele deveria tratar isto. Se ele não trata, > > além de considerar isso um bug, vai ter que remediar da forma semelhante a > > que eu sugeri. > > > > Sds. > > > > ________________________________ > > > > > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > > From: [EMAIL PROTECTED] <compuvale.software%40gmail.com> > > > Date: Thu, 3 Apr 2008 14:41:30 -0300 > > Subject: [delphi-br] Remover caracteres de arquivo txt > > > > > > Boa tarde, > > > > Utilizo um componente (JLPSay) pra imprimir notas fiscais. Esse > > componente faz uso de writeln pra criar um arquivo txt e depois copia > > esse arquivo para a porta da impressora. Esse componente tem um > > preview, que nada mais é que um form com um Tmemo onde o arquivo > > gerado é carregado. O problema, é que os primeiros caracteres que > > envio são caracteres de config da impressora Epson: > > > > printNF.put(#27+'@'); > > printNF.put(#27+#120+#0); > > printNF.put(#27+#15); > > > > E quando o preview é visualizado, aparece apenas os primeiros 4 > > caracteres. A impressão funciona perfeitamente, só o preview que tá > > zicado. Pelo que entendi, o Tmemo para a leitura no #0 (nulo) e não lê > > mais nada daí pra diante. Se eu abrir o arquivo que o componente gera > > no bloco de notas, tá lá todo o arquivo certinho. > > > > Já tentei trocar o TMemo pra richEdit. Tentei carregar o conteúdo do > > arquivo em um StringList para tirar os primeiros caracteres e obtive > > os mesmos 4 caracteres iniciais. > > > > Alguém teria alguma idéia? > > > > Esse foi o código que usei, tentei salvar todo o conteúdo pra um outro > > txt, e tentei copiando do 10º caracter até o final. > > > > wArqTmp := TStringList.Create; > > wArqTmp.LoadFromFile(printNF.TempFile); > > // wArqTmp.Text := Copy(wArqTmp.Text, 10, wArqTmp.Count); > > wArqTmp.SaveToFile('C:\Teste.txt'); > > > > []s > > Andrei > > > > Delphi 2006 Pro > > > > __________________________________________________________ > > Confira vídeos com notícias do NY Times, gols direto do Lance, > > videocassetadas e muito mais no MSN Video! > > http://video.msn.com/?mkt=pt-br > > > > > > > > > > -- > > ....................................................... > > Eduardo Silva dos Santos > DRD Sistemas. > (27) 3218-4201 > MSN: [EMAIL PROTECTED] > Site: http://www.drdsistemas.com/ > .......................................................