Luciano, Se enviar os caracteres 27 e 77 para a impressora Epson, com certeza irá mudar para o modo compactado com 12 caracteres por polegada. Esse código foi retirado do manual das Impressoras marca Epson. Acredito, exclusive, que funcione com outras impressora que emulam a impressora Epson.
Se puder passar uma parte do código, posso verificar aqui também. Nunca usei a função writeprinter(). Ulisses ----- Original Message ----- From: "Luciano" <[EMAIL PROTECTED]> To: <delphi-br@yahoogrupos.com.br> Sent: Friday, October 28, 2005 9:36 AM Subject: Re: [delphi-br] Compactar impressão matricial > Ulisses, > > Não funcionou porque provalmente estou usando writeprinter ao invés de > somente wirte. > > Mas mesmo assim agradeço a atenção. > > Luciano Alves de Oliveira > > > > Bom dia! > > > > Se for impressora Epson ESC/P 2, pode usar o seguinte: > > > > Write(F,#27#77);//Altera para 12 cpi > > > > Boa sorte. > > > > Ulisses > > > > ----- Original Message ----- > > From: "Luciano" <[EMAIL PROTECTED]> > > To: "delphi" <delphi-br@yahoogrupos.com.br> > > Sent: Friday, October 28, 2005 8:37 AM > > Subject: [delphi-br] Compactar impressão matricial > > > > > > Pessoal, > > > > Estou desenvolvendo um relatório para impressão matricial, conforme a > > revista Magazine de Janeiro/2004, funcionou tudo direitinho o problema é > > que preciso compactar a impressão e não consigo achar uma maneira de fazer > > isso > > > > Desde agradeço por qualquer ajuda. > > > > Luciano Alves de Oliveira > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > -- > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > > > > > Links do Yahoo! Grupos > > > > > > > > > > > > > > > > > > > > -- > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > > > > > Links do Yahoo! Grupos > > > > > > > > > > > > > > > > > > > > -- > > No virus found in this incoming message. > > Checked by AVG Free Edition. > > Version: 7.1.361 / Virus Database: 267.12.5/150 - Release Date: 27/10/2005 > > > > > > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > 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] 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