Форум: "WinAPI";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
ВнизКак узнать, что Соединение установлено? Найти похожие ветки
← →
Dabus (2001-11-04 20:51) [1]В реестре ключ есть, он указывает на наличие соединения Dial-Up.
var:
i_connected: byte;
r0: TRegistry;
...
...
r0 := TRegistry.Create;
r0.RootKey := HKEY_LOCAL_MACHINE;
r0.OpenKey("System\CurrentControlSet\Services\RemoteAccess", False);
r0.ReadBinaryData("Remote Connection",i_connected,SizeOf(i_connected));
r0.Free;
// i_connected=0 нет связи /=1 есть связь
Успехов.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.008 c