Rubens vou fazer uns teste aqui na minha rede (WINDOWS 2000). Minha impressora é uma TLP 2844 ZEBRA (código de barras) aparentemente funciona normal na rede. Mas como tenho uma proteção para que ela não seja compartilhada com outras maquinas, não sei como funciona na rede. Amanhã eu testo e posto uma mensagem se funciona ou não. Sei que localmente eu Uso assignFile( Impressora, \\Micro\Impressora <file://Micro/Impressora> USB) e Funciona perfeitamente. Ate Amanha Elcio Domingos Ramos <mailto:[EMAIL PROTECTED]> DEMAG Cranes & Components Ltda. Planejamento Industrial Fone: (11)4615-7823 - Fax : (11)4615-7910 -----Mensagem original----- De: Rubem Rocha [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 17:55 Para: [EMAIL PROTECTED] Assunto: RES: [delphi-br] Impressao em Porta USB - Exemplo que funciona... Prioridade: Alta Eu já vi um pessoal em um grupo de Visual FoxPro falar que esse recurso de compartilhar uma impressora USB não funciona. Seria interessante averiguar se a dica enviada funciona com impressoras de modo geral, sejam USB ou não, compartilhadas ou não. []s
-----Mensagem original----- De: Elcio Domingos Ramos [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 15:51 Para: [EMAIL PROTECTED] Assunto: RES: [delphi-br] Impressao em Porta USB - Exemplo que funciona... Se a impressora estiver compartilhada e possível enviar direto para a impressora "\\MICRO\<NOME DO COMPARTILHAMENTO DA IMPRESSORA_USB>". Isto eu estou usando aqui e funciona normal com impressoras ZEBRA (Código de Barras) o meu problema e que não quero compartilhar a impressora para evitar problemas. Estou tentando adaptar a PROCEDURE abaixo para ver se consigo. Elcio Domingos Ramos <mailto:[EMAIL PROTECTED]> DEMAG Cranes & Components Ltda. Planejamento Industrial Fone: (11)4615-7823 - Fax : (11)4615-7910 -----Mensagem original----- De: Rubem Rocha [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 17:31 Para: [EMAIL PROTECTED] Assunto: RES: [delphi-br] Impressao em Porta USB - Exemplo que funciona... Prioridade: Alta Só um detalhe, resta saber se esse mesmo método serve para impressão em uma impressora compartilhada em rede. Se servir, excelente! []s -----Mensagem original----- De: Rubem Rocha [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 9 de dezembro de 2004 15:29 Para: [EMAIL PROTECTED] Assunto: RES: [delphi-br] Impressao em Porta USB - Exemplo que funciona... Prioridade: Alta 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 --- 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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE < http://br.rd.yahoo.com/SIG=12alee78u/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1102707182/A=2332652/R=0/id=noscript/SIG=119058f8i/*http://br.download.yahoo.com/messenger/> _____ 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] <mailto:[EMAIL PROTECTED]> * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do < http://br.yahoo.com/info/utos.html> 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] 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] Yahoo! Grupos, um serviço oferecido por: <http://br.rd.yahoo.com/SIG=12alun25n/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1102708821/A=2191897/R=0/SIG=10vqa2grn/*http://br.diversao.yahoo.com/> <http://br.rd.yahoo.com/SIG=12alun25n/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1102708821/A=2191897/R=1/SIG=10vqa2grn/*http://br.diversao.yahoo.com/> São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília _____ 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] <mailto:[EMAIL PROTECTED]> * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do <http://br.yahoo.com/info/utos.html> 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] 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
