hi
@Mirage228: Hi dein Code funktioniert soweit ganz gut, nur dass bei angeklickter Box das "Close;" net mehr ging. Hier nochmal für alle, die das selbe Problem wie ich haben:
Delphi-Quellcode:
if Checkbox1.Checked then
begin
try
reg := TRegistry.Create;
reg.rootKey := HKEY_LOCAL_MACHINE; // besser wäre HKEY_CURRENT_USER!
reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True);
reg.WriteString('SPM','C:\Programme\SPM-APPS\bar.exe');
reg.CloseKey;
finally
reg.Free;
end;
end
else
begin
try
reg := TRegistry.Create;
reg.RootKey := HKEY_LOCAL_MACHINE; // besser wäre HKEY_CURRENT_USER!
reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True);
reg.DeleteValue('SPM');
reg.CloseKey;
finally
reg.free;
end;
end;
close;
end;
So, und nocheinmal DANKE an alle, die mir bei der Fehlersuche/Fehlerbehebung und beim Verständnis geholfen haben!