۲۲-اردیبهشت-۱۳۸۹, ۱۹:۵۱:۳۲
۲۲-اردیبهشت-۱۳۸۹, ۲۳:۲۴:۳۰
کد:
uses Wininet ;
function isconnected : Boolean ;
var
connectiontype: DWORD ;
begin
connectiontype:=INTERNET_CONNECTION_MODEM // type of connection
+INTERNET_CONNECTION_LAN
+INTERNET_CONNECTION_PROXY ;
Result:=InternetGetConnectedState(@connectiontype,0);//are we connect?
end;