Вопросик про реестр

[Sin9ikat]

вопрос такой:
Есть ветка в реестре, например HKEY_LOCAL_MACHINE\SYSTEM\Test
В ней есть набор папок 0001, 0002, 0003 и т.д. (количество таких папок может быть не ограничено, можеть их будет 20, а может 2). В каждой такой папке есть набор ключей (REG_SZ, REG_BINARY и REG_DWORD) c различными параметрами.
Нужно, чтобы программа просканировала все папки в ветке HKEY_LOCAL_MACHINE\SYSTEM\Test и например в ListBox выдала список параметров ключа NAME (в ключе будет текстовая строчка) из каждой папки 0001, 0002 и т.д. . При выборе какой нить строчки из списка, в поля Edit1 и Edit2 показывала параметры ключей Parametr1 и Parametr2, находящихся в папке, в которой находиться выбранноне NAME. Еще необходимо, чтобы можно было эти параметры редактировать.

[Greblin]

Это сканирование и занесение значений ключа NAME в ListBox

procedure TForm1.Button1Click(Sender: TObject);
const PATH = 'SYSTEM\Test';
var Reg: TRegistry;
     Keys: TStringList;
     i: integer;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey(UNINST_PATH, false) then
  begin
  Keys := TStringList.Create;
  Reg.GetKeyNames(Keys);
  for i := 0 to Keys.Count - 1 do
    begin
    if Reg.OpenKey(PATH + '\' + Keys[i], false) then
      ListBox1.Items.Add(Reg.ReadString('NAME'));
    Reg.CloseKey;
    end;
  end;
end;