// Get Windows Edition
Function TGInfo.GetWinEdition: String;
Var
  VersionInfo    : TOSVersionInfo;
Begin
  VersionInfo.dwOSVersionInfoSize := SizeOf(VersionInfo);
  If GetVersionEx(VersionInfo) Then
    Result :=
End;