GitHub-Mirror/x2utils
1
0
Fork 0
mirror of synced 2024-09-16 16:46:09 +00:00
Code Issues Projects Releases Wiki Activity

Fixed: VersionString for Windows Server 2003

Browse Source
This commit is contained in:
Mark van Renswoude 2004-07-22 08:20:11 +00:00
parent 84de63ea1e
commit dcbdb9edd5
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
X2UtOS.pas
View File

@ -44,8 +44,8 @@ uses
type
//:$ Enumeration of the recognized Operating System versions
TX2OSVersion =(osWin95, osWin98, osWinME, osWinNT3, osWinNT4,
osWin2K, osWinXP, osWin2003, osUnknown);
TX2OSVersion = (osWin95, osWin98, osWinME, osWinNT3, osWinNT4,
osWin2K, osWinXP, osWin2003, osUnknown);
{
:$ Contains extended version information for the Operating System
@ -192,6 +192,7 @@ begin
osWinNT4: VersionString := 'NT 4';
osWin2K: VersionString := '2000';
osWinXP: VersionString := 'XP';
osWin2003: VersionString := 'Server 2003';
osUnknown: VersionString := Format('%d.%d', [pVersion.dwMajorVersion,
pVersion.dwMinorVersion]);
end;