verificar computador em rede

Delphi

21/01/2008

como faço para verificar se o computador está em rede :?:


Obrigador pela atenção,
Pestana.


Pestana_

Pestana_

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

21/01/2008

essa função verifica se o PC possui conectividade..
declare WinInet na uses

function VerificaInternet:Boolean;
var
Sinal:DWORD;
begin
  if InternetGetConnectedState(@Sinal,0) then
    Result := True else Result := False;
end;

espero ter ajudado! :wink:


GOSTEI 0
Pestana_

Pestana_

21/01/2008

Obrigadão paullsoftware, por responder minha pergunta!

eu precisava que verificasse se está conectada a rede local, está função está verificando a conectividade com a internet.

vlw.


GOSTEI 0
Pestana_

Pestana_

21/01/2008

UP


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

21/01/2008

Colega,

Faça um laço para ´pingar´ o IP inicial até o IP final de sua rede para detectar as máquinas que estão ´respondendo´. Existem rotinas de ping pela WEB ou pode usar da paleta ´Indy´.


GOSTEI 0
Paullsoftware

Paullsoftware

21/01/2008

Obrigadão paullsoftware, por responder minha pergunta! eu precisava que verificasse se está conectada a rede local, está função está verificando a conectividade com a internet. vlw.


Comigo essa função não funciona para detectar internet, mais sim, se exite alguma conectividade... :roll:


GOSTEI 0
POSTAR