[AlienZ]

Есть вот такой код

Код:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Registry;

...

var
  Form11: TForm11;
  Reg:Tregistry;
  a:integer;
  b:string;

...

procedure TForm11.Button2Click(Sender: TObject);
begin
REG:= TRegistry.Create;
REG.RootKey:=a;
REG.OpenKey:=(b, FALSE);
REG.GetValueNames(ListBox1.Items);
REG.CloseKey;
REG.Destroy;
end;

procedure TForm11.Button4Click(Sender: TObject);
begin
a:=HKEY_LOCAL_MACHINE;
b:='\SOFTWARE\Microsoft\Windows\CurrentVersion\Run';
end;

end.

Запускаться - запускается, а работать не хочет... в чем косяк?

меня косит на переменную b... по моему она неправильно написана, а как правильно ее написать что-то понять не могу...

Помогите кто может!