Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.12.20;
Скачать: CL | DM;

Вниз

Удаление ключа из реестра   Найти похожие ветки 

 
Rendal ©   (2009-11-02 13:18) [0]

Не удаляется ключ, подскажите как правильно воспользоваться функцией  DeleteKey и DeleteValue:

procedure RegON;
var k: TRegistry;
begin
 k := TRegistry.Create;
 with k do
 begin
   RootKey := HKEY_LOCAL_MACHINE;
   OpenKey("\Software\Microsoft\Windows\CurrentVersion\Run", true);
   WriteString("CommandLine", ExtractFilePath     (Application.ExeName)+"CommandLine.exe");
   CloseKey;
   Free;
 end;
end;

procedure RegOFF;
var k: TRegistry;
begin
 k := TRegistry.Create;
 with k do
 begin
   RootKey := HKEY_LOCAL_MACHINE;
   OpenKey("\Software\Microsoft\Windows\CurrentVersion\Run", true);
   DeleteKey("CommandLine");
   DeleteValue(ExtractFilePath(Application.ExeName)+"CommandLine.exe");
   CloseKey;
   Free;
 end;
end;


 
Сергей М. ©   (2009-11-02 13:25) [1]


> Не удаляется ключ


Так удалять-то нечего - нет такого ключа, ты его не создавал.


 
Rendal ©   (2009-11-02 13:31) [2]

Нет, я использовал процедуру RegON в запущенной программе, наличие ключа проверил


 
Сергей М. ©   (2009-11-02 13:34) [3]


> наличие ключа проверил


НЕТ ключа.
Не создавал ты его.
WriteString - это НЕ создание ключа.


 
Rendal ©   (2009-11-02 13:36) [4]

хм... у меня в ccleaner даже в группе автозагрузка появился путь к проге...
а как тогда правильно?


 
Rendal ©   (2009-11-02 13:38) [5]

CreateKey и DeleteKey? Что написать в параметрах?


 
Сергей М. ©   (2009-11-02 13:38) [6]

RootKey := HKEY_LOCAL_MACHINE;
  OpenKey("\Software\Microsoft\Windows\CurrentVersion\Run", true);
  DeleteValue("CommandLine");
  CloseKey;


 
Rendal ©   (2009-11-02 13:45) [7]

Сработало, Спс!


 
Сергей М. ©   (2009-11-02 13:46) [8]


> Rendal


Разберись раз и навсегда, что есть ключ, что есть параметр ключа, что есть значение параметра ключа


 
Anatoly Podgoretsky ©   (2009-11-02 14:31) [9]

У ключа значений нет.



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

Текущий архив: 2009.12.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.01 c
15-1255470552
Германн
2009-10-14 01:49
2009.12.20
Ещё один дурацкий вопрос. Intel vs AMD.


15-1256370619
Alex_ey
2009-10-24 11:50
2009.12.20
заедает звук в адоб аудишн 3


2-1257079212
petaywww
2009-11-01 15:40
2009.12.20
С помощью каких компонентов легче и правильней реализовать данную


2-1257016742
maxstarts
2009-10-31 22:19
2009.12.20
Программа виснет при скрытие вкладок pagecontrol ов


2-1256825048
Pavel
2009-10-29 17:04
2009.12.20
Печать изображений