N�o necessariamente, companheiro. Ele n�o usa os m�todos de desenho do Canvas, e sim o device context (hDC - handle) da impressora para comunica��o direta com a mesma.
[]s -----Mensagem original----- De: Paulo Santana (Terra) [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 16:26 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] Impressao em Porta USB - Exemplo que funciona... Como disse ainda continua sendo via Canvas (Printer.Canvas) Eduardo Jedliczka wrote: >Achei um exemplo, que funciona com impressoras locais (paralelas, >seriais e USB) e impressoras de rede: > >procedure TForm1.Button1Click(Sender: TObject); >var > Buff : TPrnBuffRec; > testint : Integer; > TmpStr : String; > i : Integer; >begin > printer.BeginDoc; > > testint := PASSTHROUGH; > if not Escape(Printer.Handle, QUERYESCSUPPORT, >sizeof(TestInt),@TestInt, >nil) > 0 then > begin > ShowMessage('N�o foi poss�vel configurar a impressora para impress�o > direta'); > Exit; > end; > TmpStr := 'Estou imprimindo um texto...'#13#10'diretamente para a > impressora'#13#10'se voc� desejar formatar este texto,'#13#13'utilize os > comandos como no DOS'#12; > Buff.BuffLength := Length(TmpStr); > for i:=0 to Buff.BuffLength-1 do > Buff.Buffer[i]:=TmpStr[i+1]; > Escape(Printer.Canvas.Handle, PASSTHROUGH, 0, @Buff, nil); > Printer.endDoc; >end; > >Estou desenvolvendo um componente de preview para ela mas ando sem >tempo... > >[s] > >===================== >Eduardo Jedliczka >GeraSoft Inform�tica >Apucarana - PR >===================== > ----- Original Message ----- > From: Eduardo Jedliczka > To: [EMAIL PROTECTED] > Sent: Thursday, December 09, 2004 3:51 PM > Subject: Re: [delphi-br] Impressao em Porta USB > > > Devo discordar, � poss�vel fazer a impress�o para impressoras USB sem > ser via canvas. > > Mas � necess�rio utilizar um monte de ESCapes... ou seja, d� muito > trabalho... > > [s] > > ===================== > Eduardo Jedliczka > GeraSoft Inform�tica > Apucarana - PR > ===================== > ----- Original Message ----- > From: Paulo Santana (Terra) > To: [EMAIL PROTECTED] > Sent: Wednesday, December 08, 2004 9:05 PM > Subject: Re: [delphi-br] Impressao em Porta USB > > > Impress�o em USB somente via Canvas. > > > > Elcio Domingos Ramos wrote: > > >Como fa�o para enviar dados para a porta USB001. > > > >Uso assignFile(Imprimi, 'LTP1') > >Tentei fazer a mesma coisa com USB001 mas n�o deu certo. > > > >J� vi este assunto por aqui mas. N�o tenho acesso ao site do yahoo aqui > na empresa. > > > >Elcio Domingos Ramos <mailto:[EMAIL PROTECTED]> > >DEMAG Cranes & Components Ltda. > >Planejamento Industrial > >Fone: (11)4615-7823 - Fax : (11)4615-7910 > > > > > > > >[As partes desta mensagem que n�o continham texto foram removidas] > > > > > > > > > > > > > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 0450-0, 06/12/2004 > Tested on: 8/12/2004 20:05:26 > avast! - copyright (c) 2000-2004 ALWIL Software. > http://www.avast.com > > > > > > -- > <<<<< 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] > > > > Yahoo! Grupos, um servi�o oferecido por: > > > > > > > > > ------------------------------------------------------------------------------ > Links do Yahoo! Grupos > > a.. Para visitar o site do seu grupo na web, acesse: > http://br.groups.yahoo.com/group/delphi-br/ > > b.. Para sair deste grupo, envie um e-mail para: > [EMAIL PROTECTED] > > c.. O uso que voc� faz do Yahoo! Grupos est� sujeito aos Termos > do Servi�o do Yahoo!. > > > > [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] > > > > Yahoo! Grupos, um servi�o oferecido por: > > > > > > > >----------------------------------------------------------------------- >------- > Links do Yahoo! Grupos > > a.. Para visitar o site do seu grupo na web, acesse: > http://br.groups.yahoo.com/group/delphi-br/ > > b.. Para sair deste grupo, envie um e-mail para: > [EMAIL PROTECTED] > > c.. O uso que voc� faz do Yahoo! Grupos est� sujeito aos Termos do > Servi�o do Yahoo!. > > > >[As partes desta mensagem que n�o continham texto foram removidas] > > > > > --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 0450-1, 09/12/2004 Tested on: 9/12/2004 17:26:15 avast! - copyright (c) 2000-2004 ALWIL Software. http://www.avast.com -- <<<<< 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 --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004 -- <<<<< 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
