Pablo
Use o componente CPORTLIB e no evento OnRxChar faça (neste caso para ler um
valor
numérico)
var
STR : String;
I: byte;
begin
ComPort.ReadStr(STR, Count);
for I:= 1 to Length(STR) do
if ((Str[I] >= '0') and (Str[I] <= '9')) then
NUM:= NUM + STR[I];
....
Depois é só tratar a informação.
Espero ter ajudado.
--- pablomadias <[EMAIL PROTECTED]> wrote:
>
>
>
>
> Boa tarde, pessoal!
> Estou precisando fazer um programa em Delphi que responda a um
> estímulo via porta serial (é um único botão, ligado á porta)
> alguem sabe me explicar e teria algum equema do ckt que preciso fazer
> para ligar este botão na porta serial?
>
> Qual função que utilizo no delphi para ler a porta?
>
> Como é um unico botao, seria possivel fazer essa comunicação apenas
> fechando um "curto entre dois pinos da porta serial?
>
> Obrigado a todos.
>
>
>
>
>
>
>
>
> --
> <<<<< 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
>
>
>
>
>
>
>
>
>
Yahoo! Acesso Grátis - Internet rápida e grátis.
Instale o discador agora! http://br.acesso.yahoo.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
<*> 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
