Delphi+Реестр

← →
fighter@str © (2003-04-29 17:36) [0]

Мне нужны в текстовом виде имена отдельных строковых параметров реестра и их значения.
Подскажите, как можно их получить с помощью Delphi?
Если можно, я бы не отказался от пары исходников.
Мне посоветовали:
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey("\Software\Тест по Java", True) then
begin
Table1.DatabaseName:=Reg.ReadString("Базы данных");
Table2.DatabaseName:=Reg.ReadString("Базы данных");
end;
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
Прога не идет, ошибки:
[Error] Unit1.pas(27): Undeclared identifier: "tregistry"
[Error] Unit1.pas(29): Missing operator or semicolon
[Error] Unit1.pas(32): "THEN" expected but identifier "OpenKey" found
[Error] Unit1.pas(34): Undeclared identifier: "Table1"
[Error] Unit1.pas(35): Undeclared identifier: "Table2"

← →
Digitman © (2003-04-29 17:46) [1]

> Undeclared identifier: "tregistry"

и что ? даже не задумывался, что и почему Undeclared ?

← →
UzesCCron © (2003-04-29 19:15) [2]

use TRegistry;
думать надо...

← →
evvcom © (2003-04-29 22:17) [3]

F1 на TRegistry покажет unit Registry, значит надо
uses Registry

uses Registry;
......
var
Reg: TRegystry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey("\Software\Тест по Java", false) then begin
Table1.DatabaseName:=Reg.ReadString("Базы данных");
Table2.DatabaseName:=Reg.ReadString("Базы данных");
Reg.CloseKey
end
finally
Reg.Free
end
end;

Delphi+Реестр Найти похожие ветки