Форум: "Начинающим";
Текущий архив: 2009.12.20;
Скачать: [xml.tar.bz2];
Вниз
Удаление ключа из реестра Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.005 c
