Jeg er ikke sikker på om dette er det du tenker på, men hey! det var vært et forsøk
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CLASSES_ROOT;
if Reg.KeyExists('txt1') then
Reg.DeleteKey('txt1');
Reg.Free;
eller kanskje...
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CLASSES_ROOT;
// Åpne nøkkelen "txt1"
if Reg.OpenKey('txt1', False) then
// Slett nøkkelen "txt1" under nøkkelen "txt1" ("HKEY_CLASSES_ROOT\\txt1\\txt1")
Reg.DeleteKey('txt1');
Reg.Free;
-------------------------------------
I am AGAINST TCPA!!
[
http://www.againsttcpa.com/ ]
-------------------------------------
Mvh
DiZpel