Windowsversion ermitteln in einer Konsolenanwendung?

[Phoenix]

Mit myString := GetWinVersion; Du musst die Unit unten (Windows_Fragment) in eine eigene Datei packen und dann noch

uses
Windows, Windows_Fragment;

In die Konsolenanwendung reinschreiben.