Registrierschlüssel

[ssach]

hy,

ich will mit meinem programm auf einige Einträge in der registry zugreifen, also lesen und schreiben, wie stelle ich das an?
danke


cu :dancer:

[Uncle Cracker]

Willst du sowas:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender:TObject);
var
  reg:TRegistry;
begin
  reg:=TRegistry.Create;
  reg.RootKey:=hkey_local_machine;
  reg.OpenKey('Uncle Cracker',true);
  reg.WriteString('Test string','Test');
  reg.CloseKey;
end;

[sakura]

Also entweder Du sagst uns genauer, wo Dein Problem liegt oder Du suchst im Forum mal nach Registry oder genauer nach TRegistry. Es gibt genügend Beispiele, auch in der Registry (CodeLibrary).

...:cat:...

[ssach]

Also ich will einen Eintrag ein zb einer ganz bestimmten Stelle in der Registry reinschreiben und auslesen können!?

[Uncle Cracker]

Das kannst du mit WriteString machen. Siehe oben :warn:

[ssach]

Vielen Dank, das funzt schon,

jetzt ist nur noch mein problem einen bestimmten Eintrag aus der Registry auch wieder auslesen zu können!?

danke

cu :witch:

[Uncle Cracker]

Code:

reg.ReadString('Test');

[ssach]

hab wieder en problem:

[Error] Unit1.pas(49): Undeclared identifier: 'TRegistry'



verstehe nicht warum, fehlt mir vielleicht noch ne unit?

sorry aber bin noch newbie.. *g*

danke

cu

[Uncle Cracker]

Du musst noch unter den uses Registry einbinden

[ssach]

Danke, er nimmt die einträGe jetzt an, aber wieder ein anderes problem

ich will einenschlüssel unter : hkey_local_machine/Software/Microsoft/Windows
schreiben, also mach ich folgendes

Delphi-Quellcode:

reg.RootKey:=hkey_local_machine/Software/Microsoft/Windows

doch dann kommt die Fehlermeldung:
[Error] Unit1.pas(52): Undeclared identifier: 'SOFTWARE'

koennt ihr mir bitte nochmal helfen, waere euch sehr dankbar

cu :coder:

[Coder18]

Um einen Schlüssel zu erstellen muss der Code ungefähr so aussehen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender:TObject); 
var 
  reg:TRegistry; 
begin 
  reg:=TRegistry.Create; 
  reg.RootKey:=hkey_local_machine; 
  reg.CreateKey('Test',true);  
end;

[Uncle Cracker]

So sieht's aus, wie du es haben willst:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  reg:TRegistry;
begin
reg := TRegistry.Create;
  if(reg <> nil) then
    with reg do try
      RootKey := hkey_local_machine;
      if(OpenKey('Software\Microsoft\Windows',TRUE)) then try
         reg.WriteString('Test string','Test');
      finally
        CloseKey;
      end;
    finally
      Free;
    end;
end;

[ssach]

Danke,

das Schreiben funzt jetzt einwanfrei,

jetzt brauchte ich nur noch die Funktion zum Lesen von Schlüsseln der Registry.

danke

cu

[sakura]

Dann nutze jetzt erst einmal die Suchvorschläge von mir. Alle hier bereits gezeigten Lösungen wie auch die zur letzten Frage sind im Foruzm bereits mehrfach beantwortet worden. :twisted:

...:cat:...

[master of lan]

Hmm..

Strings lesen/schreiben: kein problem
Integer lesen/schreiben: kein problem
DWORD lesen: geht nicht(?)
Hat jmd ne idee wie ich nen dword eintrag lesen kann?



cu

[Sharky]

Zitat:

Zitat von master of lan

...
Hat jmd ne idee wie ich nen dword eintrag lesen kann? ...

Hai Lan Master,

einfach als Binärdaten schreiben.

Delphi-Quellcode:

 WriteBinaryData('Key', VarName, SizeOf(dword));

[Chewie]

Ein DWord ist doch ein Integer, halt eben ein vorzeichenloser.