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е
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е