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

В приведённой ниже процедуре почему-то не работает удаление ключа из реестра (из секции автозапуска). Подскажите почему?   Найти похожие ветки 

← →
Song   (2002-02-08 20:10) [0]

procedure TForm1.CheckBox9Click(Sender: TObject);
begin
IF not Form1.Visible then Exit;
With TRegistry.Create Do
try
RootKey:=HKEY_LOCAL_MACHINE;
Access:=KEY_ALL_ACCESS;
OpenKey("Software\Microsoft\Windows\CurrentVersion\Run\",False);
IF CheckBox9.Checked then WriteString("KLD Expert",Application.ExeName)
else DeleteKey("KLD Expert");
CloseKey;
finally
Free;
end;
end;

---

← →
Набережных С.   (2002-02-08 20:57) [1]

Вероятно, DeleteValue ?

---

← →
Anatoly Podgoretsky ©   (2002-02-08 23:34) [2]

Судя по твоему тексту тебе действительно нужно не удаления ключа, а удаления параметра.

---

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

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



Память: 0.45 MB
Время: 0.008 c