Registry ReadString method is not working in Windows 7 in Delphi 7

Question

The following code sample used to return me windows id before, but now it doesn\'t work, and returns empty string, dunno why.

  function GetWindowsID: string         


        

Answer 1

I believe it's because

str := Registry.ReadString('ProductId');

does not raise an exception when there is no ProductId. In my honest opinion, this is a bug in Delphi.