![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
В приведённой ниже процедуре почему-то не работает удаление ключа из реестра (из секции автозапуска). Подскажите почему?
Song © (2002-02-08 20:10:00)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;
Anatoly Podgoretsky (2002-02-08 23:34:00) [1]Судя по твоему тексту тебе действительно нужно не удаления ключа, а удаления параметра.
Набережных С. (2002-02-08 20:57:00) [2]Вероятно, DeleteValue ?