Fórum modem, detectando se esta em uso. #230298

06/05/2004

0

Delphi

o pessoal eu procurei muito aqui no forum sobre modem mas nao achei oque eu queria, e talvez , alguem de vcs pode me ajudar.

Eu gostaria de saber como eu poderia fazer para que se o modem estiver em uso eu retorno com um Showmessage(´Em uso´) se nao tiver em uso Showmessage(´OK´) exemplo.

se possivel me ajudarem ficarei agradecido!!!


Gustavo_sanchez

Gustavo_sanchez

Responder

Posts

06/05/2004

Fabio.hc

Tente assim:

function Modem: Boolean;
var flags: DWORD;
begin
   Result := InternetGetConnectedState(@flags, 0);
   if (flags and INTERNET_CONNECTION_MODEM) = INTERNET_CONNECTION_MODEM then
      ShowMessage(´Em uso´)
   else
      ShowMessage(´OK´);
end;



Responder

Gostei + 0

06/05/2004

Gustavo_sanchez

teve um problema ele nao reconheceu os comandos
InternetGetConnectedState
INTERNET_CONNECTION_MODEM

meu delphi ´e 5.0 e componentes padrao.


Responder

Gostei + 0

06/05/2004

Gustavo_sanchez

help


Responder

Gostei + 0

06/05/2004

Fabio.hc

Declare a unit.

uses Wininet


Responder

Gostei + 0

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

Aceitar