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

Вниз

Как вызвать стандартый дилог подключения к Интернет   Найти похожие ветки 

 
Бобров Илья   (2005-09-12 16:38) [0]

Мастера! Подскажите, как средствами  Delphi вызвать стандартный диалог подключения к Интернет.
За ранее благодарен.


 
Digitman ©   (2005-09-12 16:54) [1]

никак.

если же речь идет об установлении Удаленного соединения с компьютером в сети Интернет-провайдера с использованием модема, то так и говори.


 
Бобров Илья   (2005-09-12 17:15) [2]

Да, именно это мне и нужно. Стандартный диалог, такой-же как появляется у Internet Explorer.


 
Digitman ©   (2005-09-12 17:18) [3]

см. RAS API в MSDN


 
Бобров Илья   (2005-09-12 17:40) [4]

Модуль Ras у меня есть, но видимо моих мозгов недостаточно, для его переваривания. Можешь дать информацию по подробнее(функцию и параметры).


 
Карелин Артем ©   (2005-09-12 17:57) [5]

Не оно, но альтернатива:
uses
 ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
begin
 case OSVer of
   VER_PLATFORM_WIN32_NT:
   // Win NT, 2000, XP:
       {connection_name = the name of the connection in "Network and
       DialUp Connections", logon = logon string, password = password string.
       All are separated by spaces.}
       ShellExecute(Handle, "open", "rasdial.exe", "connection_name logon password", nil, SW_HIDE);
       // disconnect:
       // ShellExecute(Handle, "open", "rasdial.exe", " /disconnect", nil, SW_HIDE);
   VER_PLATFORM_WIN32_WINDOWS:
   // VERSION = 95, 98
      (*
     Dial Up Networking (DUN)

       module:
               RNAUI.DLL

     command:
               rundll32.exe rnaui.dll,RnaDial {name of connection to establish}
         result:
               displays the Connect To dialog for the passed connection
     *)

     ShellExecute(Handle, PChar("open"), PChar("rundll32.exe"),
       PChar("rnaui.dll,RnaDial exact name of dialer entry TRACERT -h 1 -w 1"),nil, SW_NORMAL);
 end;
end;


 
Бобров Илья   (2005-09-12 18:28) [6]

Почему-то ничего не происходит ...
А есть ли другой способ вызова этого диалога?


 
Карелин Артем ©   (2005-09-12 18:34) [7]

Поброди по ссылке:
http://torry.net/pages.php?id=200
Поищи в инете и MSDN функцию RasDial, рядом с ней должна быть функция показа диалога этого. Я уже давно не занимался этим, уже не помню как показать диалог.



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

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

Наверх




Память: 0.48 MB
Время: 0.042 c
2-1134150777
OLEGNik
2005-12-09 20:52
2005.12.25
Как экспортировать процедуры procedure(): overload из dll ?


2-1132781189
Officeman
2005-11-24 00:26
2005.12.25
Срочно! нужен "ImageList" с поддержкой *.gif


3-1131019475
DelphiLexx
2005-11-03 15:04
2005.12.25
Подтвердить транзакцию в процедуре


3-1131445760
root
2005-11-08 13:29
2005.12.25
Вопрос по ADO


2-1133960262
fast2
2005-12-07 15:57
2005.12.25
Помогите!!! Удалил случайно проект. Но остался экзешник.