Vc já tentou: write(Impressora, #27 + #67+ #48 +#49+#50);
pq '1', na tabela ASCII, equivale a 49 e '2', 50 ----- Original Message ----- From: "Paulo Sérgio Dias" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Monday, November 08, 2004 11:26 AM Subject: [delphi-br] Como enviar estes comandos via writeln Pessoal: Necessito imprimir uma nota fiscal via writeln, com entrelinhamento de 8 linhas por polegada, em papel de aproximadamente 12 polegadas. A) Ja' consegui enviar para a impressora (uma matricial Epson) o comando de 8 linhas por polegada, do seguinte modo: write(Impressora, #27 + #48); No manual da impressora, esse comando aparece assim: ESC 0 (o ultimo caractere e' o numero zero) B) Porem, necessito informar `a impressora que o papel do formulario tem 12 polegadas de comprimento. O comando para isso e' o seguinte: ASCII - ESC C 0 n Dec. - 67 Hex. - 43 Description - Set Page Length in Inches n = number of inches (1-22) Tentei fazer assim: write(Impressora, #27 + #67+ #48 + '12'); O comando ate' funciona, pois o salto de pagina esta' Ok. Mas esta' aparecendo o numero 12 impresso (passei o valor 12 porque estou usando papel de 12 polegadas de comprimento). Afinal, como e' que eu passo o parametro "n", que segundo o manual e' o comprimento da pagina em polegadas ? C) Tentei usar o comando para configurar o comprimento da pagina em numero de linhas (96 linhas). Vejam: ASCII - ESC C n Dec. - 67 Hex. - 43 Description - Set Page Length in Lines n = number of lines (1-127) Tentei o comando assim: write(Impressora, #27 + #67 + '96'); Mas desse jeito, a nao ser que eu esteja enganado, nao funcionou ! Enfim, como e' que se passa o parametro "n" para a impressora ? Muito obrigado pela atencao de todos Paulo [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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 _________________________________________________________________________________ Quer mais velocidade? Só com o acesso Aditivado iG, a velocidade que você quer na hora que você precisa. Clique aqui: http://www.acessoaditivado.ig.com.br [As partes desta mensagem que não continham texto foram removidas] -- <<<<< 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
