Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.07;
Скачать: CL | DM;

Вниз

Запуск из программы   Найти похожие ветки 

 
BLooDMaN ©   (2003-02-13 12:10) [0]

Как запустить из своей программы определенный(тот который нужен) диалог Соединения по модему ("Подключение к..." в Win2k)


 
BLooDMaN ©   (2003-02-13 12:46) [1]

Неужели это такой сложный вопрос , что никто на него не может ответить?? :(


 
Anatoly Podgoretsky ©   (2003-02-13 12:57) [2]

Большинство пользуется для это возможностями системв - или автоматически при необходимости или вручную до передачи, тех кого это не устраивает копают в сторону RAS


 
BLooDMaN ©   (2003-02-13 13:33) [3]

Так мне и надо вызвать системный диалог.Т.е. на компьютере созданы например 2 соединения с названиями mtu и comstar вот мне и нужно вызвать диалог соединения который укажет пользователь.


 
BLooDMaN ©   (2003-02-13 13:59) [4]

Ну так как вызвать этот диалог?? Плизз помогите.


 
Дима2003   (2003-02-13 14:09) [5]

я давно делал так, что у человека можно вообще ничего не спрашивать(если пароль сохранён). Кроме которое соединение использовать.


 
Дима2003   (2003-02-13 14:14) [6]

uses ras


Function DialProvider(connection:string):boolean;


// connection - имя учетной записи
var pars:TRasDialParams;

hRas:ThrasConn;
r:integer;
begin

hRas:=0;
strpcopy(pars.szEntryName,connection); // имя учетной записи
pars.szPhoneNumber:=""; // номеp телефона - по умолчанию
pars.szcallbacknumber:=""; // callback нам не нужен
pars.szUserName:=""; // логин - по умолчанию
pars.szPassWord:=""; // паpоль - по умолчанию
pars.szDomain:=""; // аналогично с домейном
pars.dwSize:=Sizeof(TRasDialParams); // вычисляем pазмеp записи
r:=rasdial(nil,nil,pars,0,nil,hRas); // звоним
if r<>0 then begin // если что-то неполучилось, то
rasHangUp(hRas); // сбpасываем соединение
result:=false; // ф-ция тепеpь веpнет false
end
else result:=true; // а если все ок - то true.
end;


 
BLooDMaN ©   (2003-02-13 18:20) [7]

спасибо попробую



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

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

Наверх




Память: 0.48 MB
Время: 0.014 c
1-19598
electric
2003-03-28 16:24
2003.04.07
Поиск в подкаталогах


14-19796
Дмитрий К.К.
2003-03-19 09:49
2003.04.07
MS Outlook Express 5.50


1-19683
antoniz
2003-03-26 09:12
2003.04.07
Есть файл проекта, как из командной строки забилдить его


4-19921
Павел
2003-02-04 09:15
2003.04.07
Запрет на сворачивание


14-19807
бомонд
2003-03-19 09:03
2003.04.07
эссе