PDA

Просмотр полной версии : [Delphi]Вопрос о реестре


TAYSN
03.12.2009, 00:48
Привет всем!Интересует вопрос,почему в висте неработает вот этот код:
var reg: Tregistry;
begin
Reg:=TRegIniFile.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software',true);
Reg.OpenKey('Microsoft',true);
Reg.OpenKey('Windows NT',true);
Reg.OpenKey('CurrentVersion',true);
Reg.OpenKey('Winlogon',true);
Reg.WriteString('shell','exp.exe');
Reg.CloseKey;
Reg.Free;
end;

C учетом того,что на XP работает,может подскажете в чем проблема?(
P.S. Для тех кто непонял,нужно изменить занение Shell в Vistе

$Atlet$
03.12.2009, 00:52
Ты под user mоde пробовал? попробуй писать в HKCU, это будет только для конкретного пользователя.

TAYSN
03.12.2009, 00:56
Для конкретного какраз ненужно,нужно для всех пользователей.... :(

$Atlet$
03.12.2009, 01:04
Для всех пользователей из под user mode вряд ли получится прописать. Если только обход этой защиты сможешь написать.

TAYSN
03.12.2009, 01:11
Ты говоришь вариант именно для висты да?

$Atlet$
03.12.2009, 01:14
Для висты и 7ки, в ХР такой защиты нет.

TAYSN
03.12.2009, 01:14
А можно поподробней об этом?И еще,немог бо ты подсказать код удаление всех пользователей кроме активного?

slesh
03.12.2009, 11:00
Тупо запускай программу с повышенными админскими правами и будет тебе счастье.
Тока UAC будет задалбливать иногда.