如何Delphi中操纵拨号网络

　　用MODEM拨号上网，仍是大多数个人网民选择上网的方式．如果能在我们的应用程序中管理拨号 网络（如Foxmail、Sygate中的拨号功能），无疑将会方便我们的软件用户（不用再切换应用程序， 运行拨号网络），提高我们的软件的友好性从而提高软件的竞争力．

　　在WIN9X下，如果安装了拨号网络，则在WINDOWS系统的系统目录System下将有两个拨号网络管理 程序库RasApi32.DLL和RasApi16.DLL，我们可利用其中的函数来获取和设置拨号连接网络的信息。在 Delphi帮助文件中，有相关函数的说明。

　　在此，我们要讨论的管理项目有：

　　１、获取当前系统中可用的拨号连接名称

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

　　３、获取和设置拨号连接的拨号参数

　　４、用指定的拨号连接拨号、挂断指定的拨号连接

　　５、获取当前活动的连接及其连接状态零、获取RasAPI函数执行失败的错误信息

　　RasAPI的调用接口是统一的，但对于不同的Windows版本，许多常量和数据结构的定义是不同的。 如果使用的数据结构与Windows版本不对应，RasAPI函数执行会失败；另外，其它原因如其它程序也 在使用同一个拨号连接进行拨号等，也会造成RasAPI函数执行失败．鉴于此原因，我们需要先讨论获 取RasAPI函数执行失败的错误信息的函数。

　　当一个RasAPI函数执行结束时，会返回一个结果标识，为0时表示执行成功，否则作为一个错误标 识符表示执行失败的原因。RasAPI函数RasGetErrorString可以根据错误标识符返回其错误描述信息，

　　在中文WIN9X下可提供一个中文错误信息．

　　RasGetErrorString的函数原型为：

function RasGetErrorString (
uErrorValue : UINT;//错误标识符
lpszErrorString : PChar;//错误提示信息的缓冲区
cBufSize : DWORD//错误提示信息的缓冲区大小
) : DWORD; stdcall;
function RasGetErrorString;external RasApiDll name 'RasGetErrorStringA';