Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];



Вниз

Удаление из реестра Windows 

Yaro   (2001-12-26 21:59) [0]

Привет всем!
Подскажите, пожалуйста, какие-нибудь методы удаления строкового параметра (или папки) из реестра Windows.
Должны же быть АПИ-функции или какие-нибудь другие методы, очень надо...

Заранее спасибо!

---

SergVlad   (2001-12-26 22:07) [1]

TRegistry

---

Romul   (2001-12-28 13:07) [2]

const
REGISTRY_KEY="Software\MyKey";

procedure .....
var
Reg:TRegistry;
begin
try
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE; //ну или др.
Reg.OpenKey(REGISTRY_KEY, true);
Reg.DeleteKey("..");
finally
Reg.Free;
end;
end;

---

Yaro   (2001-12-30 23:48) [3]

Спасибо, еще вопрос - как Експортировать "папку"?
Вернее так - почему не работает такой код?

Reg := TRegistry.Create;

Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.Access := KEY_ALL_ACCESS;
Reg.SaveKey("SOFTWARE\Microsoft", "e:\1.txt");
Reg.Free;


Windows 2000 Advenced Server (ENG), User=Administrator

---

Anatoly Podgoretsky   (2001-12-31 12:53) [4]

Romul (28.12.01 13:07)
Вообще то никто не просил удалять ключи!

DeleteValue

---

Beauty_Full   (2002-01-02 22:00) [5]

Uses {...},Registry;

{...}

Function DeleteValue(Root:HKEY;Path,VName:String):Boolean;
Var R:TRegistry;
Begin
R:=TRegistry.Create;
Result:=True;
Try R.RootKey:=Root;
If R.OpenKey(Path,False) Then R.DeleteKey(VName);
Except Result:=False
End;
R.Free
End;

или

Uses {...},RegUtil;

{...}

Function DelValue(HRoot:HKEY;Path,VName:String):Boolean;
Function DelTree(HRoot:HKEY;Path,TName:String):Boolean;
Function DelTree_A (HRoot:HKEY;Path,TName:String;Type:HREG):Boolean;
Function DelPhase(HRootAPath:GREGJ;Names:String):Boolean;

---

Romul   (2002-01-03 12:59) [6]

Сорри за неточность, но зачем нужен ключ реестра без определенного значения?

---

Muhomor   (2002-01-14 20:14) [7]

Помоему здесь задавался вопрос о АПи функцих а не о Tregistry
Вот на апи было бы не плохо услышать

---

y-soft   (2002-01-14 22:14) [8]

>Yaro ©

Re:...почему не работает такой код?..


Альтернативный способ экспорта ключей (работает независимо от версии ОС):

WinExec("regedit.exe /e c:\1.txt "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft"",SW_HIDE);

---

Yaro   (2002-01-22 15:50) [9]

y-soft: Спасибо! Очень помогли.

---

Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.73 MB
Время: 0.028 c