Статьи по программированию
примеры программного кода
Delphi, Kylix, C, C++, SQL, Visual Basic, Bash, Assembler, 1С
Qt, KOL, MFC, Rx Library, Windows, Linux, Mac OS
Как получить все Dial-Up соединения
Опубликовано codeLocker в 08.08.2008 в 10:42.
Способ 1 - из реестра:
Uses Registry;
Function DUNGetConnections( Out OutList : TStringList) : Boolean;
var Reg : TRegistry;
begin
OutList.Clear;
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\RemoteAccess\Profile', False) then
begin
Reg.GetKeyNames(OutList);
Result := True;
end
else begin
Result := False;
end;
Reg.Free;
end;
Function DUNGetConnections( Out OutList : TStringList) : Boolean;
var Reg : TRegistry;
begin
OutList.Clear;
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\RemoteAccess\Profile', False) then
begin
Reg.GetKeyNames(OutList);
Result := True;
end
else begin
Result := False;
end;
Reg.Free;
end;
Способ 2 - через RASApi:
Для этого воспользуемся функцией Use RASEnumConnections.
Далее можно определить состояние каждого соединения при помощи RASGetConnectStatus.
Так же можно использовать RASEnumEntries для получения всех сервисов из определённой телефонной книжки.
Толька для этого потребуется преобразовать заголовочный файл RAS.h в эквивалент Delphi.
Материал похожий на Как получить все Dial-Up соединения
- Как можно разорвать соединение с интернетом?
- Как узнать тип соединения с интернетом?
- Как получить весь размер системной памяти?
- Как получить дату BIOS?
Метки
соединение сетей протоколы в школе создание интернет соединения соединение сетей через интернет состояние интернет соединения как определить bios
Навигация
Сейчас на сайте
Сейчас на сайте 0 пользователей и 2 гостя.
Статистика
Всего материалов: 1387