Текущий архив: 2002.02.25;
Скачать: 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 вся ветка
Текущий архив: 2002.02.25;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.01 c
