|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
rqdxs (dxs) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2021/5/6 12:42:58 |
标题: |
|
加入我的收藏 |
楼主: |
reg:=TRegistry.Create; //读取注册表信息 name:=''; reg.RootKey:=HKEY_LOCAL_MACHINE; //指定主键 ID:=rg1.Items.Strings[rg1.itemindex]; cardNum:=copy(ID,pos(';',ID)+1,length(ID)); reg.CloseKey; if length(CardNum) < 2 then CardNum:='00'+CardNum; if LengTh(CardNum) < 3 then CardNum:='0'+CardNum; reg.OpenKey('SYSTEM\ControlSet'+CardNum+'\Services',false); reg.OpenKey('Tcpip\Parameters\Interfaces',false); ID:=CardIdLt.Strings[CardIDLt.IndexOf(ID)+1]; reg.OpenKey(id,false);
ID:=CardIdLt.Strings[CardIDLt.IndexOf(ID)+1];中提示CardIdLt没有定义 ,这是啥意思??请大侠们指教
----------------------------------------------
- |
作者: |
|
2021/5/6 12:44:35 |
1楼: |
建议用jcl的Registry
----------------------------------------------
delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行.
|
作者: |
|
2021/5/7 10:21:01 |
2楼: |
人家提示你没有定义,那就是没有定义嘛。
Delphi 里面使用的任何东西,都要事先定义的。你这个 CardIdLt 看起来还包含了一个 TStrings,大概是一个对象?对象的定义就是它是一个什么类别。
比如,你喊阿黄吃饭,这个阿黄就是一个对象。那先要定义阿黄是一个人还是一条狗才行。
----------------------------------------------
-
|
|