Да я тоже когда то получал список так.
Только столкнулся с небольшой ошибкой с файле Registry.pas
( точнее приминяемая АПИшная функция RegQueryInfoKey иногда выдавала MaxSubKeyLen на 1-2 байта меньше )
из-за которой список некоторые имена подключей выдавал неправильные.
Недавно посмотрел в Delphi 2010 тоже не исправили.
После небольшой правки, все стало работать. Файл прилагаю, бросать в папку с проектом.
|