Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Удаление ключа из реестра


Rendal ©   (2009-11-02 13:18:00) 

Не удаляется ключ, подскажите как правильно воспользоваться функцией   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;


Anatoly Podgoretsky   (2009-11-02 14:31:00) [1]

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


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


> Rendal


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


Rendal   (2009-11-02 13:45:00) [3]

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


Rendal   (2009-11-02 13:38:00) [4]

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


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

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


Rendal   (2009-11-02 13:36:00) [6]

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


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


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


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


Rendal   (2009-11-02 13:31:00) [8]

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


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


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


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо