Olá, 

vc pode usar o dtr da serial...

só não lembro se ele sai 5 ou 12v. 
eu fiz um relé funcionar por ele, mas vc tem q entender que os 5v (ou 12) que 
sai da serial não tem amperagem suficiente.
ou seja: se vc quiser jogar voltagem em alguma coisa, vai precisar de uma fonte 
e um equipamento que converta sinal em eletricidade.

se quiser outras dicas, me procure

and


  ----- Original Message ----- 
  From: Luiz Escobar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 19, 2009 3:44 PM
  Subject: Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?


  Vixe então acho que falei besteira la atras heheheheh, 
  Mas vivendo e aprendendo....
  Mas garanto que na parelala, vc acende um LED com facilidade....
  []s

  Luiz Escobar

  From: Leonardo Moreira Alves 
  Sent: Wednesday, February 18, 2009 9:17 PM
  To: delphi-br@yahoogrupos.com.br 
  Subject: Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?

  Viu pessoal na Saida Serial você não tem 5V, e 
  sim 12V e -12V vc precisa de um conversor serial para trabalhar com 5V

  Sugiro a utilização da Porta Paralela, é mais 
  fácil e mais simples... além de que tem 5V.

  Abraços

  At 11:18 18/2/2009, you wrote:

  >Use WriteFile pois a porta COM (Serial) é 
  >interpretada como um arquivo, veja um bom exemplo no link abaixo:
  >
  >[ 
  
><http://www.swissdelphicenter.ch/torry/printcode.php?id=841>http://www.swissdelphicenter.ch/torry/printcode.php?id=841
 
  >]
  >
  >[]'s
  >Ricardo.
  >
  >__________________________________________________________
  >
  >"Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!"
  >
  >--- Em qua, 18/2/09, Fellipe Henrique 
  ><<mailto:fellipeh%40gmail.com>felli...@gmail.com> escreveu:
  >De: Fellipe Henrique <<mailto:fellipeh%40gmail.com>felli...@gmail.com>
  >Assunto: Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?
  >Para: <mailto:delphi-br%40yahoogrupos.com.br>delphi-br@yahoogrupos.com.br
  >Data: Quarta-feira, 18 de Fevereiro de 2009, 11:08
  >
  >hum... to usando essa função pra abrir a porta
  >
  >function AbrirPorta(NomePort a:String) :boolean;
  >begin
  >hCom := CreateFile(
  >PChar(NomePorta) ,
  >GENERIC_READ or GENERIC_WRITE,
  >0, //Dispositivos COM abertos com acesso exclusivo.
  >nil, //Sem atributos de segurança.
  >OPEN_EXISTING, //deve usar OPEN_EXISTING
  >0, //Entrada e saída sem ovelap.
  >0 //Deve ser NULL para COM.
  >);
  >if(hCom = INVALID_HANDLE_ VALUE) then //Se houve algum erro ao abrir a
  >porta.
  >result := false
  >else
  >result:= true;
  >end;
  >
  >Como faria pra enviar algo por ela? Seria a mesma coisa que na LPT1?
  >WriteLn?
  >
  >[]s
  >
  >2009/2/18 Ricardo César Cardoso <ricardo_engsoft@ yahoo.com. br>
  > > Na verdade é só vc enviar uma informação qualquer pela porta serial. É
  > > que o pessoal de eletrônica geralmente pensa tudo na base do 0 ou 5 volts.
  > >
  > > Precisei fazer algo parecido um tempo atrás e penei até entender esse
  > > "mandar 5v pela serial", quando na verdade era só mandar qualquer coisa
  > > (literalmente) pra serial.
  > >
  > > Isso aí é simples. Basta abrir a porta e enviar qualquer coisa pra ela.
  > >
  > > []'s
  > > Ricardo.
  > >
  > > ____________ _________ _________ _________ _________ _________ _
  > >
  > > "Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! "
  > >
  > > --- Em qua, 18/2/09, Fellipe Henrique 
  > <felli...@gmail. com<fellipeh%40gmail. com>>
  > > escreveu:
  > >
  > >
  > > Vixi...bom, eu preciso enviar um pulso pela porta serial pra abrir uma
  > > catraca... o rapaz da catraca falou que teria 
  > que ser um pulso de 5 volts...
  > > agora fiquei encucado.. será que é só abrir a porta e pronto?
  > > O problema é que não tenho a catraca aqui, só mesmo um cabo, com um led...
  > > diz o cara que se acender o led vai funcionar... hehe
  > >
  > > []s
  > >
  > > 2009/2/18 Luiz Escobar <esco...@megasistem a .com.br>
  > >
  > > > Se vc enviar um pulso de 5 volts da serial vai queimar ela....
  > > >
  > > > O que vc realmente precisa ???
  > > >
  > > > Luiz Escobar
  > > >
  > > > From: Fellipe Henrique
  > > > Sent: Wednesday, February 18, 2009 11:30 AM
  > > > To: delphi...@yahoogrup os.com.br <delphi-br%40yahoog rupos.com. br>
  > > > Subject: [delphi-br] Como enviar um pulso de 5 volts pela serial?
  > > >
  > > >
  > > > Amigos, preciso enviar um pulso de 5 volts para a porta serial, nunca 
fiz
  > > > isso, alguem tem idéia de como fazer?
  > > >
  > > > []s
  > > >
  > > > --
  > > > ____________ _________ _________ ___
  > > > T.·.F.·.A.·.
  > > > Fellipe Henrique
  > > > Blog: www.digitumsoft. com.br/blogs/ fellipeh
  > > > ------------ --------- --------- --------- --------- --------- -
  > > > CAMPANHA POR UMA INTERNET SEGURA
  > > > Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
  > > > mensagens use SEMPRE o "Cco" (cópia oculta).
  > > > Assim TODOS os endereços estarão preservados. E, claro, antes de
  > > encaminhar
  > > > um e-mail, delete todas as informações que apareçam no corpo do e-mail e
  > > > que
  > > > possam ser usadas por hackers.
  > > > ############ ######### ######### #########
  > > >
  > >
  > > Veja quais são os assuntos do momento no Yahoo! +Buscados
  > > <http://br.maisbusca>http://br.maisbusca dos.yahoo. com
  > >
  > >
  >--
  >_________________________________
  >T.·.F.·.A.·.
  >Fellipe Henrique
  >Blog: www.digitumsoft. com.br/blogs/ fellipeh
  >
  >----------------------------------------------------------
  >CAMPANHA POR UMA INTERNET SEGURA
  >Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
  >mensagens use SEMPRE o "Cco" (cópia oculta).
  >Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
  >um e-mail, delete todas as informações que 
  >apareçam no corpo do e-mail e que possam ser usadas por hackers.
  >
  >############ ######### ######### #########
  >
  >Veja quais são os assuntos do momento no Yahoo! +Buscados
  ><http://br.maisbuscados.yahoo.com>http://br.maisbuscados.yahoo.com
  >

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]


  

[As partes desta mensagem que não continham texto foram removidas]

Responder a