Watch, Follow, &
Connect with Us

For forums, blogs and more please visit our
Developer Tools Community.


ID: 22828, Windows Version Information 2.0

by Jonas Gunnarsson Email: guson@spray.se


A collection of function, procedures and links about retriving the Windows Version information.
Download Details
FTP  download also available
CDN Login Required to Download. (You will be redirected to the login page if you click on the Download Link)
To download this, you must have registered:
A free membership

For Delphi, Version 4.0  to 7.0 847 downloads
Copyright: Open Source or other


Size: 6,780 bytes
Updated on Sun, 28 Nov 2004 09:16:20 GMT
Originally uploaded on Sun, 28 Nov 2004 09:11:39 GMT
SHA1 Hash: EE31F60CFEEC144A8D74B2C6131CF56D667C9A5F
MD5 Hash: 3CA72AF3958C5BEFC1A41A7D5203051A

    Explore the files in this upload

Description
A collection of function, procedures and links about retriving the Windows Version information.

Retrive the Windows version information using OSVERSIONINFO and OSVERSIONINFOEX.

The unit(gWinVerInfo.pas) define some constants and procedures to make it easy to get the Windows Version Information.

gWinVerInfo.pas defines the folowing procedures/functions;

function GetWindowsVersion( // For all Windows version
var MajorVersion: Integer;
var MinorVersion: Integer;
var BuildNumber: Integer;
var PlatformId: Integer;
var CSDVersion: string): Boolean;
function GetWindowsVersionEx( // Requires Windows NT 4.0 SP6 or later.
var MajorVersion: Integer;
var MinorVersion: Integer;
var BuildNumber: Integer;
var PlatformId: Integer;
var CSDVersion: string;
var ServicePackMajor: Integer;
var ServicePackMinor: Integer;
var SuiteMask: Integer;
var ProductType: Integer): Boolean;

procedure GetProductInfo( // Requires Windows NT or later
var IsServer: Boolean;
var ProductTypeString: string;
var SuiteMaskString: string;
var ServicePackString: string);
procedure GetWindowsInfo( // For all Windows version
var WindowsVersion: Integer;
var WindowsPlatformId: Integer;
var WindowsVersionString: string;
var WindowsBuildString: string);

// For all Windows version
function GetWindowsLongInfo: string;
function GetWindowsShortInfo: string;

How to use see example code, WindowsVersions.pas.
The definition of the OSVERSIONINFOEX see, gWindows.pas

Don't hesitate to send comments to .

Attachment for "Windows Version Information 2.0":
gWindows.pas
gWinVerInfo.pas
WindowsVersions.dfm
WindowsVersions.pas
WinVerInfo.dpr

   Latest Comments  View All Add New

Move mouse over comment to see the full text

Could not retrieve comments. Please try again later.

Server Response from: ETNACDC03