Hallo!
Ich glaube Du hast den OpenKey vergessen!
Delphi-Quellcode:
procedure Tmain.Button2Click(Sender: TObject);
var Reg : TRegistry;
a:Boolean;
begin
if config.CheckBox1.Checked :=TRUE then
Reg:=TRegistry.Create;
Reg.Rootkey:=HKEY_CURRENT_USER;
Reg.OpenKey('\SOFTWARE\',true);
// Ich nehme mal an, das Du vergessen hast Ihm zu sagen, wo der Key eigentlich ist!
a:= Reg.DeleteKey('MySQL_Tool');
// Außerdem würde ich den vorrangestellten Backslash beim KeyNamen weg lassen!
Reg.Free;
Application.Terminate
else Application.Terminate;
end;
Ich hoffe, das hilft Dir!
Gruß
Michael!