Fórum Comunicação serial #283037

26/05/2005

0

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


Edusjc

Edusjc

Responder

Posts

27/05/2005

Radatec

Caro Amigo

O que vc esta ligando na saida serial do computador?
Que tipo de informação é envidada?


Responder

Gostei + 0

27/05/2005

Edusjc

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


Responder

Gostei + 0

27/05/2005

Radatec

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.


Responder

Gostei + 0

28/05/2005

Edusjc

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


Responder

Gostei + 0

29/05/2005

Antseralves

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
====


Responder

Gostei + 0

30/05/2005

Xandyr

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!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar