به اینترنت متصل هستیم یا نه؟

[NR_289]

چطوری میشه فهمید که به اینترنت متصل هستیم یا نه؟
البته غیر از روش چک کردن IP
چون در این روش در صورتی که به هر شبکه ای غیر از اینترنت هم وصل باشیم آدرس IP تغییر میکند و ما را به اشتباه می اندازد.

[مهدی کرامتی]

function GetOnlineStatus : Boolean;
var ConTypes : Integer;
begin
ConTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
if (InternetGetCONNECTEDState(@ConTypes, 0) = False) then Result := False else Result := True;
end;