如何在DELPHI程序中调Windos的拨号程序？

Question

不好意思，是windows中的拨号程序

Answer 1

　　在Delphi程序中可以用如下代码实现拨号上网：
　　winexec('rundll32.exe rnaui.dll,RnaDial 163',SW_SHOWNORMAL);
　　其中字符串中的最后一个参数“163”为拨号连接的名称。　　下面是一个用指定的拨号连接拨号上网的例子．
{ 用指定的拨号连接拨号上网 }
procedure TForm1.Button4Click(Sender: TObject);
var
strDialName : string;
begin
strDialName := '163';//拨号连接的名称设为163
memo1.lines.add( '******************用拨号连接'+ strDialName
+'实现拨号上网****************');
winexec( PChar('rundll32.exe rnaui.dll,RnaDial ' + strDialName),SW_SHOWNORMAL);
end;

Answer 2

var
    iReturn:Integer;
begin
    iReturn:=Winexec('rundll32.exe rnaui.dll,rnadial '+'//拨号名',9)；
    case iReturn of
    0:ShowMessage('Not Enough Memory');
    ERROR_BAD_FORMAT:ShowMessage('Not Win32 Program');
    ERROR_FILE_NOT_FOUND:ShowMessage('Don't find Program');
    ERROR_PATH_NOT_FOUND:ShowMessage('Path Error');
end;

Answer 3

http://www.csdn.net/expert/topic/168/168985.shtm