Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.30;
Скачать: 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 вся ветка

Текущий архив: 2003.10.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
1-98732
real_fatboy
2003-10-21 16:58
2003.10.30
Подскажите пож. как новое окошко создать... :)


14-98792
Dimka Maslov
2003-10-13 13:07
2003.10.30
Политика


14-98825
Marser
2003-10-07 00:49
2003.10.30
Анатолий Подгорецкий!


1-98666
Ujin
2003-10-21 16:17
2003.10.30
Lotus notes API - primeru ispolzovania


1-98655
Ev1972
2003-10-17 09:35
2003.10.30
Как рисовать круглые кнопки