Probleme mit TStrings

[Thurgen]

Hi,

ich habe versucht mit der Registry procedure "GetKeyNames(Strings: TStrings);" einen Registry Baum in eine TStrings Variable einzulesen. Das Programm startet ohne Error aber sobalt die Zuweisung kommt bricht das Programm mit einem Speicher Zugriffs Fehler ab. Tausche ich die TString Varibale mit einem Memo Feld aus funktioniert es.

with TRegistry.create(KEY_READ) do
begin
Rootkey:=HKEY_LOCAL_MACHINE;
OpenKey('Enum\PCI', false);
getKeyNames(memo1.lines);
closekey;
free;
end;

Hat vieleicht jemand eine Idee wie ich das Programm mit TStrings zum laufen bekomme?