Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Wert und Schlüssel in registry löschen ? (https://www.delphipraxis.net/121438-wert-und-schluessel-registry-loeschen.html)

thomas2009 27. Sep 2008 15:31


Wert und Schlüssel in registry löschen ?
 
Hallo

ich beantrage Schlüsseln und Werte folgendes :
Delphi-Quellcode:
var regist: TRegistry;
begin

    regist:=TRegistry.Create;
       regist.RootKey:=HKEY_CURRENT_USER;
    regist.openkey('SOFTWARE\myprogram\test',true);
    regist.writestring('information','My name');
    regist.free;
end;
Wie lösche ich den Wert oder den Schlüsseln ?
_

toms 27. Sep 2008 15:36

Re: Wert und Schlüssel in registry löschen ?
 
Hallo Thomas

Die Zaubertaste "F1" über dem Stichwort TRegistry drücken.
Dann öffnet sich die

Unter Methoden findest du:

Zitat:

CloseKey
Create
CreateKey
DeleteKey
DeleteValue
Destroy
GetDataInfo
GetDataSize
GetDataType
GetKeyInfo
GetKeyNames
GetValueNames
HasSubKeys
KeyExists
LoadKey
MoveKey
OpenKey
...
Jetzt musst du nur noch die passende aussuchen.

Luckie 27. Sep 2008 22:55

Re: Wert und Schlüssel in registry löschen ?
 
Zitat:

Zitat von thomas2009
Hallo

ich beantrage Schlüsseln und Werte folgendes :
Delphi-Quellcode:
var regist: TRegistry;
begin

    regist:=TRegistry.Create;
       regist.RootKey:=HKEY_CURRENT_USER;
    regist.openkey('SOFTWARE\myprogram\test',true);
    regist.writestring('information','My name');
    regist.free;
end;

Ich hoffe das ist nur Demo-Code und wird in keiner Produktivumgebung verwendet. Dort fehlt jegliche Fehlerbehandlungen und der Ressourcenschutzblock:

Delphi-Quellcode:
var
  regist: TRegistry;
begin
  regist:=TRegistry.Create;
  try
    regist.RootKey:=HKEY_CURRENT_USER;
    if regist.openkey('SOFTWARE\myprogram\test',true) then // Fehlerbehandlung
    begin
      try // WriteString wirft eine Exception, wenn die Methode fehlschlägt, deswegen try-except
        regist.writestring('information','My name');
        regist.CloseKey; // Schlüssel schliessen
      except
        regist.CloseKey; // Sicherstellen, dass der Schlüssel auch im Fehlerfall geschlossen wird
        raise; // Exception nach oben weiterreichen
      end;
    end;
  finaly // Ressourcenschutzblock
    regist.free;
  end;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz