Registry auslesen GetValueNames + ReadRegBinary

[p80286]

Ich hab jetzt die Hilfe nicht zur Hand, darum stimmt die Syntax bestimmt nicht, aber so ähnlih sollte es gehen:

Delphi-Quellcode:

For i := 0 to sl.count -1 do begin
   if reg.ReadDataType(sl[i])=binary then
     memo1.Lines.add(sl[i]+reg.ReadBinary(sl[i]);
  end;

Die überprüfung des Datentyps muß sein, wenn der nicht stimmt bekommst Du ein paar exceptions um die Ohren gehauen.

Gruß
K-H