Скачать: CL | DM;

Как програмно вызвать стандартный виндозный дозвонщик?   Найти похожие ветки 

← →
volser   (2003-08-08 21:22) [0]

Как програмно вызвать стандартный виндозный дозвонщик?

---

← →
nikus ©   (2003-08-08 21:56) [1]

WinInet.InternetAutodial

---

← →
volser   (2003-08-09 00:47) [2]

> WinInet.InternetAutodial

Можно поподробней, а то у меня что то не работает. И где указывается имя соединения?

---

← →
nikus ©   (2003-08-09 11:06) [3]

Имя соединения должен выбрать пользователь и нажать кнопочку "подключиться".

---

← →
Rouse_ ©   (2003-08-09 11:36) [4]

У меня он вызывается при пинге любого внешнего IP (естественно при неактивном инете).

Желаю успехов

---

← →
SergP ©   (2003-08-09 15:19) [5]

> Rouse_ © (09.08.03 11:36)
> У меня он вызывается при пинге любого внешнего IP (естественно
> при неактивном инете).
>
> Желаю успехов


Хм... А у меня не вызывается. Наверное потому что в настройках стоит "Не вызывать соединение" (ME). Как в таком случае быть.
И вообще как это делают проги-дозвонщики?

---

← →
vadfe ©   (2003-09-03 17:24) [6]

procedure TGl.RunProcessAndWait(ExeName, CmdLine, WinName : String);
Var P : TProcessInformation;
I : TStartupInfo;
begin
FillChar(I, Sizeof(I), 0);
I.cb := sizeof(I);
I.lpTitle := @(WinName[1]);
if CreateProcess( Nil, PChar(ExeName + " " + CmdLine),
Nil, Nil, FALSE, 0,
Nil, Nil, I, P) then
WaitForSingleObject(P.HProcess, INFINITE)
else
ShowMessage(SysErrorMessage(GetLastError));
end;
//*******
q,s:string;
s:=//название соединения
//в w2k соединение по умолчанию
//HKEY_CURRENT_USER\RemoteAccess\InternetProfile
q:= "-h "+"""+ s+""";
Gl.RunProcessAndWait("Rasphone.exe", q , "WinName");

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c