Autostart-Registry Eintrag löschen??

[me2u]

Hallo,

ich will in mein Programm die Möglichkeit mit einbinden, ob es beim Start von Windows automatisch gestartet werden soll oder nicht. Hierzu schreibe ich den entsprechenden Schlüssel in entweder HKEY_CURRENT_USER oder HKEY_LOCAL_MACHINE /Software/Microsoft/.../Run.. soweit sogut..

Mein Problem ist nicht das reinschreiben sondern das löschen. Kann es sein, dass mir dazu irgendwelche Rechte fehlen?? Die Funktion liefert mir immer den Wert FALSE, also löschen nicht möglich..

Weis jemand wie ich das hinbekomme?? Irgendwie muss das doch möglich sein, "normale" Programme dürfen das doch auch


MfG & besten dank

[fLaSh11]

Vielleicht wäre es noch sinnvoll den Code deines Löschvorgangs hier zu posten...

[me2u]

hmm.. ok.. da könnte was dran sein...

Delphi-Quellcode:

  
reg:= TRegistry.Create;
  try
    reg.RootKey:= HKEY_CURRENT_USER;

    if reg.OpenKey('software\Microsoft\Windows\Currentversion\Run',True) then begin
        if reg.DeleteKey('software\Microsoft\Windows\Currentversion\Run\GIS')= False then begin
          ShowMessage('Key konnte nicht gelöscht werden');
        end;
        reg.CloseKey;
    end
    else ShowMessage('Key konnte nicht geöffnet werden')
  finally
    reg.Free;
  end

so sollte es eigentlich gehn.. denk ich..

an dem "reg.OpenKey" liegt es denk ich nicht, weil wenn ich diese Zeile rausnehm passiert immernoch das selbe...

danke schonmal

[SirThornberry]

zuerst solltest du bei OpenKey das True weg nehmen und dann bezweifel ich das du wirklich einen Key angelegt hast du den du löschen willst Handelt es sich vielleicht doch eher um einen Value?

[me2u]

ehmmm.. dumme frage: wo ist der unterschied zw. value und key... ich möchte mein son ding in der reg löschen, das eben den Namen (GIS) hat, als typ steht da REG_SZ und nen Wert, also den Pfad.. und dieses gesamte dings möchte ich löschen.. also dass es dann eben nicht mehr startet... erstellen tu ich es mit
      reg.Writestring('GIS', Application.ExeName); sry für meine unkenntniss


das TRUE kann ich nicht weglassen (nicht genügend wirkliche parameter)


//EDIT: fehler ausgebessert (letzte zeile: statt False muss True stehn)

[Luckie]

ShowMessage('Key konnte nicht gelöscht werden'); Ist nicht sehr hilfreich, weil es nichts über den Grund aussagt. Was sagt denn SysErrorMessage(GetLastError) an dieser Stelle?

[SirThornberry]

mit

Zitat:

zuerst solltest du bei OpenKey das True weg nehmen

meinte ich das da False hinn sollte. Denn wenn du etwas löschen willst stört es ja nicht wenns da ist. Mit deinem True würdest du aber den Pfad anlegen obwohl du ihn gar nicht benötigst.

Der unterschied zwischen Key und Value ist eigentlich einfach. Key's sind das was dir im Registryeditor als Ordner dargestellt wird. Und Values sind das was in den "Ordnern" liegt

[me2u]

alsoooo...

auf FALSE setzen bringt leider auch nix und als SysError sagt er nur ''Vorgang wurde erfolgreich beendet'' warum auch immer... und du hattest recht, ich will ein Value löschen..

MfG

[me2u]

hmmmm... mal anders gefragt, wie würdet ihr sowas machen??
kann mir mal jemand seien vorschlag/code posten?? oder kann es an meinem betriebssystem (win xp home) liegen??

thx

[SirTwist]

Hi,

wenn Du das hier schreibst:

Delphi-Quellcode:

if reg.OpenKey('software\Microsoft\Windows\Currentversion\Run',True) then begin
        if reg.DeleteKey('software\Microsoft\Windows\Currentversion\Run\GIS')= False then begin

Dann will er den Key

Code:

\software\Microsoft\Windows\Currentversion\Run\software\Microsoft\Windows\Currentversion\Run\GIS

löschen. Ich glaube nicht, dass es den gibt, oder?

Außerdem willst Du einen Value löschen und keinen Key. Also mach Dein reg.openKey (aber mit False als Parameter) und dann lösch den Value "GIS". Die Funktion musst Du Dir aus der Onlinehilfe suchen, ich hab hier grad kein Delphi zur Verfügung.