Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Registry - Informationen Schreiben und lesen... (https://www.delphipraxis.net/69046-registry-informationen-schreiben-und-lesen.html)

EDatabaseError 9. Mai 2006 14:55


Registry - Informationen Schreiben und lesen...
 
Wie kann ich Programminfos wie eine Integervariable oder einen String in der Registry abspeichern und dann irgentwann wieder aufrufen und den Wert ggf. ersetzen????

Mfg
Tobi

mkinzler 9. Mai 2006 14:57

Re: Registry - Informationen Schreiben und lesen...
 
Schau mal nach TRegistry

EDatabaseError 9. Mai 2006 15:02

Re: Registry - Informationen Schreiben und lesen...
 
Meine D3 Hilfe sagt folgendes:

Das Objekt TRegistry bietet systemnahe Funktionalität für den Zugriff auf die Registrierdatenbank von MicrosoftWindows95/NT.

Unit

registry

Beschreibung

TRegistry kapselt den Zugriff auf die Windows 95/NT-Registrierung von einer Anwendung aus. Bei der Registrierung handelt es sich um eine Datenbank, in der Anwendungen Informationen zur aktuellen Konfiguration verwalten. Die Informationen sind dabei nach hierarchischen Gesichtspunkten gegliedert. Jede Verzweigung in dieser baumartigen Struktur wird als Schlüssel bezeichnet. Jeder Schlüssel kann weitere Unterschlüssel sowie Datenwerte enthalten, die einen bestimmten Teil der Konfigurationsinformationen repräsentieren.

Alle Schlüssel, die eine Anwendung erzeugt, öffnet, liest oder schreibt, sind Unterschlüssel von sogenannten vordefinierten Hauptschlüsseln. Standardmäßig wird ein TRegistry-Objekt mit dem Hauptschlüssel HKEY_CURRENT_USER erzeugt.
In einem TRegistry-Objekt kann zu einem bestimmten Zeitpunkt immer nur auf einen einzigen Schlüssel zugegriffen werden. Der Schlüssel, der aktuell erreichbar ist, kann mit einem Lesezugriff auf die Eigenschaft CurrentKey ermittelt werden. Mit den Methoden von TRegistry kann eine Anwendung Schlüssel öffnen, schließen, speichern, kopieren und löschen.

Jeder Schlüssel kann einen oder mehrere Datenwerte mit Konfigurationsinformationen aufnehmen. Über die Methoden von TRegistry läßt sich feststellen, ob ein Schlüssel Daten enthält. Außerdem können Schlüsseldaten gelesen und geschrieben werden.


:( Leider 0,00 Beispiele :(

Gibts da irgentein Tutorial oder sowas in der Art??? Wenn nein dann wär das mal was für die CL.

Matze 9. Mai 2006 15:05

Re: Registry - Informationen Schreiben und lesen...
 
Guck mal in der CL nach AutostartAutostart da siehst du die Vorgehensweise.

Hador 9. Mai 2006 15:10

Re: Registry - Informationen Schreiben und lesen...
 
Liste der Anhänge anzeigen (Anzahl: 1)
Das sollte dir helfen.
Stammt aus dem EasyDelphiHelper von dsdt.net

Luckie 9. Mai 2006 15:12

Re: Registry - Informationen Schreiben und lesen...
 
Zitat:

Zitat von EDatabaseError
:( Leider 0,00 Beispiele :(

Schon mal auf die Idee gekommen im Forum nach TRegistry zu suchen? :roll:

EDatabaseError 9. Mai 2006 15:13

Re: Registry - Informationen Schreiben und lesen...
 
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('Software\Meine Software\', True);
    Reg.WriteString('Eintrag', 'Wert');
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
end;
So... Der Ordner meine Software wie kann ich den anlegen??? Wird der automatisch angelegt?

Und das ist Lesen:
function ReadString(const Name: string): string;

mkinzler 9. Mai 2006 15:19

Re: Registry - Informationen Schreiben und lesen...
 
Der Key wird automatisch angelegt weil du im 2. Parameter der Funktion OpenKey True angegeben hast.

fkerber 9. Mai 2006 15:22

Re: Registry - Informationen Schreiben und lesen...
 
Hi!

Hast du mal in der Hilfe nach OpenKey geschaut?
Das sollte deine Frage beantworten...


Ciao Frederic

EDatabaseError 9. Mai 2006 15:43

Re: Registry - Informationen Schreiben und lesen...
 
Delphi-Quellcode:
unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,registry, StdCtrls;

type
  TForm2 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('Software\Meine Software\', True);
    Reg.WriteString('Eintrag', 'Wert');
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
end;

procedure TForm2.Button2Click(Sender: TObject);
var
  Reg: TRegistry;
  s: String;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('Software\Meine Software\', True);
    s := Reg.ReadString('Eintrag');
    showmessage(s);
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
end;

end.
Noch etwas für die Zukunft kann ja in die CL.

Mfg


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:23 Uhr.

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