请问怎用调用控制面版上的拨号连接?谢谢!
解决方案 »
- 在线等!!!翻译一下这几行代码。
- SynEdit中如何实现象UltraEdit中那样光标所在行其背景色变为黄色的效果?
- 请问如何能让DBGrid显示动态创建的ClientDataSet中的数据?
- 请问大家有得知powererp这种erp软件的情况的?
- 数据库问题
- 消息框问题
- Application.ProcessMessages方法怎么用?
- 仇深似海,为什么女人会这样!!!!!!!!!!!!!!!!!!
- 读ini文件用ini.readsectionvalues,为什麽会把'XXX=0'的都读入,而不是只读‘0’
- delphi与bcb比学哪个好
- DateTimePicker怎么用?!!!我是小鸟我怕啥
- 大家快来看呀!CSDN的天大的丑闻:118+1=118 哪个SB写的SQL语句!不会小学没毕业吧?
var OSVI:OSVERSIONINFO;
begin //调用 拨号上网
OSVI.dwOSVersionInfoSize := SizeOf(OSVERSIONINFO);
GetVersionEx(OSVI);
//判断操作系统
If OSVI.dwPlatformId = VER_PLATFORM_WIN32_NT
THEN
shellexecute(0,'open','rasphone',PCHAR('entry'),nil,sw_normal)
ELSE
shellexecute(0,'open','rundll32.exe','rnaui.dll,RnaDial',nil,sw_normal);
end;