Windows10対応バージョン取得

高齢プログラマ 2015-11-07 02:44:05 No: 47720

Windows10対応のバージョン取得で悩んでいます。
とりあえず下記プログラムで動くようですが、レジストリの引用とは何か不安です。
http://www.delphipraxis.net/186147-os-version-windows-10-ermitteln.html

他に方法は無いものでしょうか？(Delphi2007)

通りすがり 2015-11-07 03:33:50 No: 47721

普通にWin32APIの

で大丈夫だと思います。ただし適切なアプリケーションマニフェストをつける必要があります。詳細はDEKOさんとこの

アプリケーションマニフェスト [Delphi Programming]
http://ht-deko.com/tech077.html

のWindows Vista互換モードの解除の項をご覧ください。

あるいはWMIを使用してWin32_OperatingSystemから情報を取得する、という手もあります。