Comunicação serial
galera, eu entrei no site http://www.tmssoftware.com/ e lá peguei o componente do delphi TMS Async32 para comunicação serial, só que não sei como funciona os componetes dele, e preciso ler os bits da porta serial para informar se está chegando 0 ou 1 em cada bit que recebo da porta. Alguem sabe como funciona e poderia me ajudar??
Desde já agradeço..
Eduardo
Desde já agradeço..
Eduardo
Edusjc
Curtidas 0
Respostas
Radatec
26/05/2005
Caro Amigo
O que vc esta ligando na saida serial do computador?
Que tipo de informação é envidada?
O que vc esta ligando na saida serial do computador?
Que tipo de informação é envidada?
GOSTEI 0
Edusjc
26/05/2005
tá sendo ligado um outro computador para transmissão serial. De inicio é apenas um teste para verificar se funciona ou não o programa, que na verdade vai estar ligado em um firmware, na qual vai estar controlando um braço mecanico, e a unica coisa que preciso é verificar os dois bits mais significativos de uma palavra de 8 bits que irei estar recebendo. Caso esses dois bits seja o que estou esperando, quer dizer que a mensagem toda me interessa, senão, eu descarto o resto da mensagem e começo a ler novamente.
Só que de acordo com o componente TMS Async32 eu não consigo salvar o byte em uma variavel. Alguem tem alguma idéia de como salvo um byte em uma variável com esse componente??
Obrigado
Eduardo
Só que de acordo com o componente TMS Async32 eu não consigo salvar o byte em uma variavel. Alguem tem alguma idéia de como salvo um byte em uma variável com esse componente??
Obrigado
Eduardo
GOSTEI 0
Radatec
26/05/2005
Caro Amigo
Deu uma olhada nos seguintes links
http://forum.clubedelphi.net/viewtopic.php?t=63279&start=0&postdays=0&postorder=asc&highlight=serial
http://forum.clubedelphi.net/viewtopic.php?t=62952&start=0&postdays=0&postorder=asc&highlight=serial
Tem um programa que vc pode fazer alguns testes:
http://www.rogercom.com/PortaSerial/PortaSerial.htm
Faça uma pesquisa aqui no forum que vc deve achar alguma coisa.
Deu uma olhada nos seguintes links
http://forum.clubedelphi.net/viewtopic.php?t=63279&start=0&postdays=0&postorder=asc&highlight=serial
http://forum.clubedelphi.net/viewtopic.php?t=62952&start=0&postdays=0&postorder=asc&highlight=serial
Tem um programa que vc pode fazer alguns testes:
http://www.rogercom.com/PortaSerial/PortaSerial.htm
Faça uma pesquisa aqui no forum que vc deve achar alguma coisa.
GOSTEI 0
Edusjc
26/05/2005
Obrigado pelo retorno..
Sobre aqueles dois tópicos que me mandou, o primeiro foi uma pergunta que eu mesmo fiz, e baixei um componente que o usuário me indicou, mas não consegui nele fazer com que fosse salvo um byte em uma variavel..
Eduardo
Sobre aqueles dois tópicos que me mandou, o primeiro foi uma pergunta que eu mesmo fiz, e baixei um componente que o usuário me indicou, mas não consegui nele fazer com que fosse salvo um byte em uma variavel..
Eduardo
GOSTEI 0
Antseralves
26/05/2005
Um exemplo usando o componente VaComm1 dos que vc baixou:
:
:
:
[b:019ea06b56]public[/b:019ea06b56]
function LeByte : byte;
:
:
:
function TForm1.LeByte : byte;
var Ch : char;
Bt : Byte Absolute Ch;
begin
repeat until (VaComm1.ReadChar(Ch));
Result := Bt;
end;
AntSer
====
:
:
:
[b:019ea06b56]public[/b:019ea06b56]
function LeByte : byte;
:
:
:
function TForm1.LeByte : byte;
var Ch : char;
Bt : Byte Absolute Ch;
begin
repeat until (VaComm1.ReadChar(Ch));
Result := Bt;
end;
AntSer
====
GOSTEI 0
Xandyr
26/05/2005
Cara eu estou fazendo um componente modbus para onde trabalho e tive que pesquisar, acontece que vc sempre vai receber bytes da serial, o negócio a trabalhar em cima dele, digamos que vc tenha recebido um byte com o valor 127 convertendo isso pra bit vc teria 01111111, ou seja
seu bit menos significativo seria 1 e o mais signigicativo seria 0, sendo assim trabalhe em cima do byte que vc está recebendo caso seja necessario converta para bits!
seu bit menos significativo seria 1 e o mais signigicativo seria 0, sendo assim trabalhe em cima do byte que vc está recebendo caso seja necessario converta para bits!
GOSTEI 0