현 운영체제의 ProductID 얻기 함수를 아래와 같이 작성하여 보았습니다. {** 현 운영체제의 ProductID를 얻는다. @result 현 운영체제의 ProductID *} function GetProductID: String; const CURRENT_VERSION = 'SOFTWARE\Microsoft\Windows\CurrentVersion'; var reg: TRegistry; begin reg := TRegistry.Create; try reg.RootKey := HKEY_LOCAL_MACHINE; if reg.KeyExists(CURRENT_VERSION) then begin reg.OpenKey(CURRENT_VERSION, False); if reg.ValueExists('Produ..