Como saber se esta conectado a Internet

Question

Oi Pessoal...Mais uma vez Gostaria de saber como eu fa�o para que o meu aplicativo saiba que esta conectado a internet olha o algaritimo abaixo..se o computador estiver conectado a internet entaoinici...

Alexdias · Answer

8) AI VAI CARO COLEGA ... 8)

1�) Voc� deve acrescentar um componente NMFTP (da paleta FastNet); 2�) Insira o seguinte c�digo no evento OnShow do formul�rio;
If (NMFtp1.GetLocalAddress <> �0,0,0,0�) Then ShowMessage(�Voc� n�o est� conectado!�) Else ShowMessage(�Voc� est� conectado!�);
3�) Execute o programa e veja o resultado;

OBS : Insira o codigo no evento onshow e n�o no on creat nem no onactivete;

Fabio.hc · Answer

Tente esta dica:[url]//delphiforum.icft.com.br/forum/viewtopic.php?t=30176&start=0&postdays=0&postorder=asc&highlight=[/url]...

Adilsond · Answer

Experimente a fun��o abaixo para saber se a internet est� OffLine

uses WiniNet

function IsGlobalOffline: boolean;
var
State, Size: DWORD;
begin
Result := False;
State := 0;
Size := SizeOf(DWORD);
if InternetQueryOption(nil, INTERNET_OPTION_CONNECTED_STATE, @State, Size) then
if (State and INTERNET_STATE_DISCONNECTED_BY_USER) <> 0 then
Result := True;
end;

Spooner · Answer

Obrigado a Todos que postaram, afim de me ajudar..Valew Fabio,, mais uma fez deu Certinho... :wink: Obrigado....