A
Size: a a a
A
Дt
A
DB
SB
A
A
AK
AK
A
DB
DB
AK
AK
A
A
VA
SB
procedure TRegistry.GetValueNames(Strings: TStrings);
var
Len: DWORD;
I: Integer;
Info: TRegKeyInfo;
S: string;
begin
Strings.Clear; // опаньки! Там же передан непроинициализированный Result
A
AK