Скачать: CL | DM;

W2K + HKEY_LOCAL_MACHINE + PowerUser = грабли   Найти похожие ветки 

← →
yaJohn ©   (2003-10-20 14:46) [0]

Собственно - сабж. Не хочет открывать ключ. Под XP - все нормально. В W2k под админом - тоже.
Приведу на всяк случай код, вдруг точку с запятой забыл поставить...

procedure TForm1.Button1Click(Sender: TObject);
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_LOCAL_MACHINE;
if reg.OpenKey ("\Software\John", true)
then begin
Reg.WriteString("John", Edit1.Text);
Reg.CloseKey;
end
else begin
ShowMessage (":("); //Тут вылетает сабж.
exit;
end;

if reg.OpenKey ("\Software\John", true)
then begin
ShowMessage (Reg.ReadString("John"));
Reg.CloseKey;
end
else begin
ShowMessage ("2 :(");
exit;
end;
end;

Где грабли? Заранее спасибо.

---

← →
Юрий Федоров ©   (2003-10-20 14:50) [1]

Наврено просто нет прав на изменение HKEY_LOCAL_MACHINE
под этим пользователем ?

---

← →
yaJohn ©   (2003-10-20 14:53) [2]

RegEdit, однако может. И документация утверждает, что можно...

---

← →
Игорь Шевченко ©   (2003-10-20 15:28) [3]

if reg.OpenKey ("Software\John", true)

Не поможет ?

---

← →
dmtr ©   (2003-10-20 16:14) [4]

Reg.OpenKeyReadOnly ?

---

← →
yaJohn ©   (2003-10-20 16:25) [5]

2 Игорь Шевченко
Пробовал...

2 dmtr
Нужно и чтение и запись...

---

← →
Rouse_ ©   (2003-10-20 16:29) [6]

Юрий Федоров же сказал, получи права на изменение этого ключа.

Пример есть в FAQ кажется

Желаю успехов

---

← →
clickmaker ©   (2003-10-20 16:31) [7]

TRegistry.Create(KEY_WRITE) ?

---

← →
Razorblade   (2003-10-20 16:35) [8]

Та же проблема под Win2k_Sp3! Не получается ПРОСТО прочитать из реестра :

iInfo := TRegistry.Create;
iInfo.RootKey := HKEY_CURRENT_USER;
iInfo.OpenKeyReadOnly("Software\Microsoft\Windows\CurrentVersion\Internet Settings\");
Result.ProxyEnabled := Boolean(iInfo.ReadInteger("ProxyEnable"));
......

Под Админом - нормально а вот под другим юзером ... облом.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c