Olá Alexandre,

Encontrei esta dica na internet uma vez. Vê se funciona pra vc.

------------------------------------------------------------------------------------------------------------
Esta dica usa a api do windows especificamente e o mesmo processo que o
internet explorer usa
pra checar a conexão usando a função da Wininet.dll que vem com o internet
explorer

BOOL InternetCheckConnection(
LPCTSTR lpszUrl,
DWORD dwFlags,
DWORD dwReserved
);

inclua no uses WinInet

if InternetCheckConnection('http://www.yahoo.com/', 1, 0) then
edit1.text:= 'Connected'
else
edit1.text:= 'Disconnected';
end;

vc pode obnter mais deltalhes no site do msdn falow gente foi lindo
------------------------------------------------------------------------------------------------------------

Abraços,

JC


[As partes desta mensagem que não continham texto foram removidas]

Responder a