Re: How to obtain Registry key values?

Posted by Stefan Loeners on May 25, 2000 at 15:46:42:

In Reply to: How to obtain Registry key values? posted by Siamak Javid on May 25, 2000 at 13:20:52:

: Hi
: Which function or procedure in which unit can get a specified key value in NT registry?
: Can any one help me with this? Probably with a small example?
: Thanks

Here it is :
procedure TForm1.Button1Click(Sender: TObject);
var
Registry:TRegistry;
s:String;
x:String;
begin
Registry:=TRegistry.Create;
Registry.RootKey:=HKEY_LOCAL_MACHINE;
Registry.OpenKey('\Software\Microsoft\Windows NT\CurrentVersion\Winlogon',False);
S :=Registry.ReadString('DefaultUserName');
x:=Registry.ReadString('DefaultDomainName');
label1.caption:=s;
label2.caption:=x;
Registry.Free;
end;