Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.02;
Скачать: CL | DM;

Вниз

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

 
denimas   (2002-08-21 09:55) [0]

Никак неполучается...
Необходимо определить подключи (если я правильно их называю) у ключа HKEY_USER.

кусок кода:
reg.rootkey:=HKEY_USERS;
if not(reg.HasSubKeys) then messagedlg("Ни хрена неработает",mterror,[mbok],0);


Проблема в том что на каждой машине в HKEY_USERS подключи разные, это такие длинные цифирки, а мне в этих подключах надо чистить секции. А как к ним добраться?. GetKeyNames ничего не возвращает. У кого какие мысли по этому поводу?


 
Tokha ©   (2002-08-21 10:08) [1]

>кусок кода:
>reg.rootkey:=HKEY_USERS;

После этого надо вставить следующее:
reg.OpenKey("", false);

Тогда будет работать GetKeyNames.


 
Игорь Шевченко ©   (2002-08-21 10:15) [2]

procedure TForm1.FormCreate(Sender: TObject);
begin
with TRegistry.Create(KEY_READ) do
try
RootKey := HKEY_USERS;
OpenKey("", false);
// ^^^^^^^^^^^^^^^^^^^
if HasSubKeys then
GetKeyNames(ListBox1.Items)
else
ShowMessage("No subkeys");
finally
Free();
end;
end;


 
denimas   (2002-08-21 13:11) [3]

ВСЕМ СПАСИБО.



Страницы: 1 вся ветка

Текущий архив: 2002.09.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
3-3311
VZ-KZ
2002-08-12 15:31
2002.09.02
Сохранение базы в формате Excel


6-3559
S@shka
2002-06-21 19:02
2002.09.02
Клиент - сервер. Интересный вопрос


14-3594
Afrolov
2002-08-05 17:01
2002.09.02
Проблема с записью CD-RW дисков в winXP


1-3334
Cr@sh
2002-08-21 15:48
2002.09.02
Помогите с оптимизацией использования процедур.


6-3539
zam
2002-06-21 18:37
2002.09.02
Как узнать имя пользователя под которым комп вошел в сеть(домен)?