Wetten dass ich schneller RegToStr als
Delphi-Quellcode:
var regist: TRegistry;
begin
try
regist := TRegistry.Create;
regist.RootKey := HKEY_CURRENT_USER;
regist.OpenKey(path, true);
result := regist.ReadString(name);
regist.Free;
except
result := '';
end;
end;
schreiben kann....

*gg*