Einzelnen Beitrag anzeigen

Benutzerbild von shareholder
shareholder

Registriert seit: 1. Nov 2003
Ort: Denmark, Lolland, Marielyst
280 Beiträge
 
Delphi 7 Enterprise
 
#1

TRegistry, Aktuellen Pfad speichern...

  Alt 4. Mai 2004, 00:02
hallo, ich möchte für jeden key die
values Name + String in mein Array Of Record speichern

Delphi-Quellcode:
reg.RootKey := HKEY_LOCAL_MACHINE;

// einlesen der keys in TStringList 'Schluessel'
...

MeinPersoenlicherRoot := 'HARDWARE\DESCRIPTION\';

if (reg.OpenKey(MeinPersoenlicherRoot, FALSE)) then begin
// Informationen in Array Of Record speichern
for i:=0 to Schluessel.Count-1 do begin
  reg.OpenKey(Schluessel[i], False);
    DasArray.Programm := reg.ReadString('Name')
    DasArray.Pfad := reg.ReadString('String')
  reg.CloseKey;
end;
reg.CloseKey;
mein problem:

ich habe hier wohl eine etwas blöde verschachtelung vorgenommen.

ich suche nach einer möglichkeit, einen Rootkey à la
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION festzulegen

mit Registry.RootKey := kann ich ja nur die erste Ebene als Root kennzeichnen.

für die Zeile : reg.OpenKey(Schluessel[i], False); könnte ich auch theoretisch
reg.OpenKey('HARDWARE\DESCRIPTION\'+Schluessel[i], False); schreiben, nur stelle ich mir vor, das die Ladezeiten, dann ziemlich länger sind.

Stimmt das ? Ich meine, dann müsste sich ja die CPU beim Value-Zugriff immer vom Root zum Zielkey hochsuchen.

Gibt es eine Alternative ?
Habe keine gefunden.
Mastdarmpapillenentzündung ist cool
  Mit Zitat antworten Zitat