如何实现用Delphi对驱动设备地操作? 例如,修改网卡的IP地址等参数。应该用到什么控件?请各位大虾指教! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 首先调用Windows API修改注册表HKEY_LOCAL_MACHINES\System\CurrentControlSet\Services\Class\NetTrans\000x中含有自己IP地址的键值改完之后再调用API重新启动计算机,OK! 你可以调用API用程序操作注册表来改IP 程序如下:var Reg: TRegistry;begin Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; if reg.OpenKey('\System\CurrentControlSet\Services\Class\NetTrans\0000', True) then Reg.WriteString('IPAddress','192.1.1.1'); Reg.CloseKey; Reg.Free;end; 做登陆窗体时超过20秒就停止身份验证的代码的怎么表示啊? 很久不用DELPHI了,请教一个简单问题 在DLL中调用一个窗体,出错 一个很简单的问题,但就是不能解决啊 纪录插入位置问题,来着有分!!1 数据转换的问题(100分) Bom表的数据库设计问题 传异地输数据库数据,用FTP如何传输,在线等候 卖骨髓 请问,我的couba服务器在多台几访问的时候都回死机,请问有什么方法解决吗 如何实现用Delphi对驱动设备地操作? 中国的ISP服务真差,尤其是Lycos,光收钱不做事!!!搞WebSnap开发的人一定要来看看,引以为戒。可怜,我花了一个月开发的Web 应用程序
HKEY_LOCAL_MACHINES\System\CurrentControlSet\Services\Class\NetTrans\000x
中含有自己IP地址的键值
改完之后再调用API重新启动计算机,OK!
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
if reg.OpenKey('\System\CurrentControlSet\Services\Class\NetTran
s\0000', True) then Reg.WriteString('IPAddress','192.1.1.1');
Reg.CloseKey;
Reg.Free;
end;