Após cansar de ver muita gente sofrendo, querendo um bom componentezinho para matricial, resolvi disponibilizar um que uso há uns 5 anos, porém, o espaço do grupo está lotado. Portanto quem quizer, e-mail-me em pvt. NESSE COMPONENTE VC TERÁ QUE FAZER O RELATÓRIO "NA UNHA", como era no Clipper.
De quebra já vai uns comandinhos básicos para impressora matricial.... Marca da impressora....... Epson Padr"o da impressora...... Epson 9 pinos Retorno do carro.......... CHR(13) Salto de pagina........... CHR(12) Linhas por p ginas........ CHR(27)+'C'+CHR(NNN) Colunas por linha......... CHR(27)+'Q'+CHR(NNN) Ativa Tamanho duplo....... CHR(14) ou CHR(27)+CHR(14) 40 CPL Ativa expandido........ CHR(27)+'W1' Desativa expandido........ CHR(27)+'W0' Ativa comprime 17,5 cpp CHR(15) 132 CPL Desativa comprime 17,5 cpp CHR(18) <normal> 80 CPL Ativa comprime 20 cpp.. CHR(27)+'M'+CHR(15) 160 CPL Desativa comprime 20 cpp.. CHR(27)+'P' Ativa elite (12 cpp)... CHR(27)+'M' 96 CPL Desativa elite (12 cpp)... CHR(27)+'P' Ativa enfatizado....... CHR(27)+'E' Desativa enfatizado....... CHR(27)+'F' Ativa negrito.......... CHR(27)+'G' Desativa negrito.......... CHR(27)+'H' Ativa italico.......... CHR(27)+'4' Desativa italico.......... CHR(27)+'5' Ativa sublinhado....... CHR(27)+'-1' Desativa sublinhado....... CHR(27)+'-0' Ativa subscrito........ CHR(27)+'S0' Ativa sobrescrito...... CHR(27)+'S1' Desativa sub/sobrescrito.. CHR(27)+'T' Ativa 8 lin/pol........ CHR(27)+'0' Desativa 8 lin/pol........ CHR(27)+'2' Ativa landscape........ Desativa landscape........ Ativa qualidade carta.. CHR(27)+'x1' Desativa qualidade carta.. CHR(27)+'x0' (draft) Obs.: Expandido + condensado 68 CPL Marca da impressora....... HP Laser IIP Padrao da impressora...... 7. Hp LaseJet II Linhas por p ginas........ Ativa comprime 17,5 cpp CHR(27)+'(s16.67H' ou CHR(27)+'(s15H' 132 cpl Desativa comprime 17,5 cpp CHR(27)+'(s10H' Ativa comprime 20 cpp.. CHR(27)+'(s16.67H' Desativa comprime 20.cpp.. CHR(27)+'(s10H' Ativa elite (12 cpp)... CHR(27)+'(s12H' 096 cpl Desativa elite (12 cpp)... CHR(27)+'(s10H' Ativa negrito.......... CHR(27)+'(s3B' ou CHR(27)+'(s7B' Desativa negrito.......... CHR(27)+'(s-3B' ou CHR(27)+'(s0B' Ativa sublinhado....... CHR(27)+'&d1D' Desativa sublinhado....... CHR(27)+'&d@' Ativa expandido........ CHR(27)+'(s5H' Desativa expandido........ CHR(27)+'(s10H' Ativa 8 lin/pol........ CHR(27)+'(s1P' Desativa 8 lin/pol........ CHR(27)+'(s0P' Ativa landscape........ CHR(27)+'&l1O' Desativa landscape........ CHR(27)+'&l0O' Ativa qualidade carta.. CHR(27)+'(s2Q" Desativa qualidade carta.. CHR(27)+'(s1Q" (draft) Marca da impressora....... Padrao IBM Padr"o da impressora...... 1. IBM 9 pinos Linhas por p ginas........ CHR(27)+'C'+CHR(NNN) Ativa comprime 17,5 cpp CHR(15) Desativa comprime 17,5 cpp CHR(18) Ativa comprime 20 cpp.. CHR(30)+'5' Desativa comprime 20 cpp.. CHR(30)+'0' Ativa elite............ CHR(30)+'2' Desativa elite............ CHR(30)+'0' Ativa negrito.......... CHR(27)+'E' Desativa negrito.......... CHR(27)+'F' Ativa expandido........ CHR(27)+'W'+CHR(1) Desativa expandido........ CHR(27)+'W'+CHR(0) Ativa 8 lin/pol........ CHR(27)+'0' Desativa 8 lin/pol........ CHR(27)+'2' Ativa landscape........ Desativa landscape........ Marca da impressora....... DeskJet 500 Padr"o da impressora...... 5. Hp DeskJet Linhas por p ginas........ Ativa comprime 17,5 cpp CHR(27)+'(s16.67H' Desativa comprime 17,5 cpp CHR(27)+'(s10H' Ativa comprime 20 cpp.. CHR(27)+'(s16.67H' Desativa comprime 20 cpp.. CHR(27)+'(s10H' Ativa elite............ CHR(27)+'(s12H' Desativa elite............ CHR(27)+'(s10H' Ativa negrito.......... CHR(27)+'(s3B' Desativa negrito.......... CHR(27)+'(s-3B' Ativa expandido........ CHR(27)+'(s3B' Desativa expandido........ CHR(27)+'(s-3B' Ativa 8 lin/pol........ CHR(27)+'(s1P' Desativa 8 lin/pol........ CHR(27)+'(s0P' Ativa landscape........ CHR(27)+'&l1O' Desativa landscape........ CHR(27)+'&l0O' Marca da impressora....... Rima Padr"o da impressora...... 1. IBM 9 pinos Linhas por p ginas........ CHR(27)+'C'+CHR(NNN) Ativa comprime 17,5 cpp CHR(15) Desativa comprime 17,5 cpp CHR(18) Ativa comprime 20 cpp.. CHR(27)+'['+CHR(5) Desativa comprime 20 cpp.. CHR(27)+'['+CHR(0) Ativa elite............ CHR(27)+'['+CHR(2) Desativa elite............ CHR(27)+'['+CHR(1) Ativa negrito.......... CHR(27)+'E' Desativa negrito.......... CHR(27)+'F' Ativa expandido........ CHR(27)+'W'+CHR(1) Desativa expandido........ CHR(27)+'W'+CHR(0) Ativa 8 lin/pol........ CHR(27)+'0' Desativa 8 lin/pol........ CHR(27)+'2' Ativa landscape........ Desativa landscape........ Marca da impressora....... Canon BJC-240 Padr"o da impressora...... 5. Hp DeskJet Linhas por p ginas........ CHR(27)+'C'+CHR(NNN) Ativa comprime 17,5 cpp CHR(15) Desativa comprime 17,5 cpp CHR(18) Ativa comprime 20 cpp.. CHR(27)+'M'+CHR(15) Desativa comprime 20 cpp.. CHR(27)+'P' Ativa elite............ CHR(27)+'M' Desativa elite............ CHR(27)+'P' Ativa negrito.......... CHR(27)+'E' Desativa negrito.......... CHR(27)+'F' Ativa expandido........ CHR(27)+'W'+CHR(1) Desativa expandido........ CHR(27)+'W'+CHR(0) Ativa 8 lin/pol........ CHR(27)+'0' Desativa 8 lin/pol........ CHR(27)+'2' Ativa landscape........ Desativa landscape........ -- <<<<< 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