procedure xxxxx(KeyName)
var
...
begin
定位主键的位置
if Registry.HasSubKeys then
begin
Registry.GetKeyNames(TString);
for i:=0 to TString.Items.Count-1 do
xxxxx(TString.Values[i])
end;
end;
var
...
begin
定位主键的位置
if Registry.HasSubKeys then
begin
Registry.GetKeyNames(TString);
for i:=0 to TString.Items.Count-1 do
xxxxx(TString.Values[i])
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货