Как узнать тип соединения с Интернетом: сеть или модем

← →
-= Demon =- (2003-06-18 17:29) [0]

Можно ли различить, какое в данный момент подключение к Интернету: по локальной сети или модемное? Функции InternetGetConnectedState абсолютно все равно, какое оно, гланое что есть.

← →
k$v © (2003-06-18 19:43) [1]

Вот ... наверное можно приспособить... кажется где-то на этом сервере брал...
unit connectinet; interface uses Windows;{ Flags for InternetGetConnectedState } const INTERNET_CONNECTION_MODEM = 1; INTERNET_CONNECTION_LAN = 2; INTERNET_CONNECTION_PROXY = 4; INTERNET_CONNECTION_MODEM_BUSY = 8; const winetdll = "wininet.dll"; function InternetGetConnectedState(lpdwFlags: LPDWORD; dwReserved:DWORD):BOOL; stdcall; external winetdll name "InternetGetConnectedState"; function InternetConnected: Boolean; implementation function InternetConnected: Boolean; var dwConnectionTypes: DWORD; begin dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY; ( @dwConnectionTypes, 0) Вот ... наверное можно приспособить... кажется где-то на этом сервере брал... unit connectinet; interface uses Windows;{ Flags for InternetGetConnectedState } const INTERNET_CONNECTION_MODEM = 1; INTERNET_CONNECTION_LAN = 2; INTERNET_CONNECTION_PROXY = 4; INTERNET_CONNECTION_MODEM_BUSY = 8; const winetdll = "wininet.dll"; function InternetGetConnectedState(lpdwFlags: LPDWORD; dwReserved:DWORD):BOOL; stdcall; external winetdll name "InternetGetConnectedState"; function InternetConnected: Boolean; implementation function InternetConnected: Boolean; var dwConnectionTypes: DWORD; begin dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY; Result := InternetGetConnectedState(@dwConnectionTypes, 0); end; end.

Как узнать тип соединения с Интернетом: сеть или модем Найти похожие ветки