Ich habe ein Deja vù:
Zitat von
Mitternachtsfalke:
Delphi-Quellcode:
if checkbox1.checked then
begin
MyReg:=TRegistry.Create;
try
MyReg.RootKey:=hkey_local_machine;
MyReg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',true);
MyReg.WriteString('Wert_egal',Application.ExeName);
MyReg.CloseKey;
finally
MyReg.Free;
end; end
else begin
MyReg.RootKey:=hkey_local_machine;
MyReg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', false);
if MyReg.ValueExists('Wert_egal') then
MyReg.DeleteValue('Wert_egal');
MyReg.CloseKey;
end; end;
So was ähnliches hatten wir vor ein paar Tagen/Wochen/Monaten schon mal.
- HKEY_LOCAL_MACHINE als Ziel kann ohne Admin-Rechte in die Hose gehen.
- Warum schreibst du den Registry-Code zweimal? Einmal öffnen, und dann abhängig von der Checkbox den Wert eintragen oder entfernen.
