ComPort
16/09/2004
0
Ola galera!
Alguém sabe me explicar, como fasso para obter a resposta logo depois que enviei um comando ( COMPORT ).
Exemplo:
Tenho uma função que serve para discar, mas dentro dela preciso verificar alguns itens, conforme segue abaixo:
procedure Discar ( prTel: String );
begin
// Primeiro preciso tirar o fone do gancho
WriteStr( ´ath2´ + #1310 );
// Logo em seguida preciso obter resposta se o comando passado
// acima não deu problema
???
// Depois mando discar
WriteStr(´at´ + dp + prTel);
// Aqui também preciso obter resposta se o comando passado
// acima não deu problema
???
end;
Até mais,
Fabio
Alguém sabe me explicar, como fasso para obter a resposta logo depois que enviei um comando ( COMPORT ).
Exemplo:
Tenho uma função que serve para discar, mas dentro dela preciso verificar alguns itens, conforme segue abaixo:
procedure Discar ( prTel: String );
begin
// Primeiro preciso tirar o fone do gancho
WriteStr( ´ath2´ + #1310 );
// Logo em seguida preciso obter resposta se o comando passado
// acima não deu problema
???
// Depois mando discar
WriteStr(´at´ + dp + prTel);
// Aqui também preciso obter resposta se o comando passado
// acima não deu problema
???
end;
Até mais,
Fabio
Frcost@
Curtir tópico
+ 0
Responder
Posts
16/09/2004
Dopi
Para ´escrever´ na serial voce precisará de um componente de acesso a Portas Seriais....
Existem vários Free.... eu uso a Synaser
http://www.ararat.cz/synapse/
Na página do ´Cirilo Veloso´ aqui do forum tem vários exemplos de acesso a serial...
http://www.veloso.kit.net/rs232.html
Existem vários Free.... eu uso a Synaser
http://www.ararat.cz/synapse/
Na página do ´Cirilo Veloso´ aqui do forum tem vários exemplos de acesso a serial...
http://www.veloso.kit.net/rs232.html
Responder
Clique aqui para fazer login e interagir na Comunidade :)