我想取得某个主键下的全部键值,然后赋给一个ListBox,请指点一下方向啊

Question

uses
  Registry;procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  with TRegistry.Create do try //这点提示够了吗，不够继续
    RootKey := HKEY_CURRENT_USER;
    if OpenKey('\Software\Microsoft\Windows\CurrentVersion', False) then
      GetValueNames(ListBox1.Items);
    CloseKey;
  finally
    Free;
  end;
end;

Answer 1

to cornermoss:
   这段时间在做什么啊:)

Answer 2

你没挂QQ呀 ??百万石我感冒了,现在都还咳嗽得厉害`~~~~~~谢谢zswang(伴水)啊^_^

Answer 3

to zswang(伴水)(被黑中)　：谢谢你的指点呀，现在问题解决了^_^