Главная страница
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.011 c
2-1256906798
Aleks
2009-10-30 15:46
2009.12.20
Как очистить CheckBoxes при показе ListView?


15-1256243411
Юрий
2009-10-23 00:30
2009.12.20
С днем рождения ! 23 октября 2009 пятница


15-1255923670
Denis123
2009-10-19 07:41
2009.12.20
Попробуйте разгадать задачку


3-1231735370
S_p_a_w_n
2009-01-12 07:42
2009.12.20
Ограничение даты


3-1231746313
zdm
2009-01-12 10:45
2009.12.20
Связь с MySQL используя SSH тунелирование