如何Delphi中操纵拨号网络

　　３、获取默认的拨号连接的名称

　　默认的拨号连接，即用户在浏览器中设置的拨号连接，该连接可以认为是用户最常用拨号连接．

　　在注册表的HKEY_USERS.DefaultRemoteAccess位置，有一个字符串名Profile，它对应字符值即为HKEY_USERS.DefaultRemoteAccessAddresses．

　　二、新建拨号连接、修改拨号连接的属性

　　RasAPI函数RasCreatePhonebookEntry、RasEditPhonebookEntry通过调用Win9X的

　　新建拨号连接、修改拨号连接的设置界面，允许用户新建拨号连接、修改拨号连接，具体的设置操作还要由系统来完成．

　　１、新建拨号连接

　　新建拨号连接的RasAPI函数为RasCreatePhonebookEntry，其函数原型为：

function RasCreatePhonebookEntry(
hwnd : THandle; //新建拨号连接窗口的父窗口的句柄，为NIL表示桌面(DeskTop)
lpszPhonebook: pchar//电话本名称
在Win9X下无作用
可为空字符串
) : DWORD;stdcall;
function RasCreatePhonebookEntry;external RasApiDll name 'RasCreatePhonebookEntryA';

　　函数返回值为0表示执行成功；否则为错误代码．

　　下面是一个应用例子，允许用户新建一个拨号连接．

var
dwResult : DWORD;
begin
//在当前窗口中新建拨号连接
dwResult := RasCreatePhonebookEntry( handle
'' );
if dwResult = 0 then
memo1.lines.add('新建拨号连接成功!')
else
memo1.lines.add('新建拨号连接失败：!' + GetRasError( dwResult ))
end;

　　２、修改拨号连接的属性

　　修改拨号连接的属性的RasAPI函数为RasEditPhonebookEntry，其函数原型为：