۲۷-خرداد-۱۳۹۳, ۱۵:۵۳:۱۸
۲۸-خرداد-۱۳۹۳, ۰۹:۰۲:۴۲
کد:
// hangup the default Internet connection.
procedure HangUp;
var
dwConnectionTypes: DWORD;
begin
dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY;
if InternetGetConnectedState(@dwConnectionTypes, 0) then
// connected
InternetAutodialHangup(0);
end;