Как узнать все параметры ключа реестра?

← →
XeLax (2004-06-28 21:51) [0]

Как узнать все параметры из некоего ключа реестра?
Пишу так и выдает ошибку:

function GetChangedString(s : PChar) : PChar;
var
Reg : TRegistry;
Strings : TStrings;
i, j, k : integer;
str, str1 : string;
begin
Result:=s;

str:=s;
Reg := TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey("\SYSTEM\WPA",true);

Strings:=TStrings.Create;
Reg.GetValueNames(Strings);
for i:=0 to Strings.Count-1 do //тута выдает ошибку !
begin
....
end;
Reg.Free;
Strings.Free;
end;

← →
Mim1 © (2004-06-28 21:56) [1]

> Strings : TStrings;

> Strings:=TStrings.Create;

Strings := TstringList.Create

1. TStrings -абстрактный класс, а значит, что можно создавать толтько его потомков, например, TStringList
2. Экземпляр класса надо сначала создавать, а потом использовать:
var
...
Strings : TStringList;
...
begin
Strings := TStringList.Create;

try
...

finally
Strings.Free;
end;

Как узнать все параметры ключа реестра? Найти похожие ветки