比如,有一个表项名称为FSCH,在这个表项下,有几个子项,1、2、3、KSA、QWER,等等,我该怎么才能读出这几个子项的名称?换个说法:要遍历FSCH这个表项下边的所有子项名称,然后读取出来,把这些子项名称加到个下拉菜单里边去,这个应该怎么编程?从没这样用过但是现在需要会的大侠帮帮忙啊

解决方案 »

  1.   

    TRegistry.GetValueNames 获得注册表项内容,返回一个TStringList,然后你再处理这个TStringList
      

  2.   

    按楼上的意思给你写的代码:uses Registry;
    ...var
      Reg : TRegistry;
      Sts : TStringList;
    begin
      Sts := TStringList.Create;
      Reg := TRegistry.Create;
      Reg.RootKey := HKEY_LOCAL_MACHINE;
      Reg.OpenKey('\SOFTWARE\MicroSoft\Windows\CurrentVersion\Run',True);
      Reg.GetValueNames(Sts);
      Combobox1.Items.Text := Sts.Text;
      Reg.Free;
      Sts.Free;
    end;