Returns the major and minor version and the build number of the operating system.
Kernel.bdh
GetOperatingSystemInfo( majorVersion : out long, minorVersion : out long, buildNumber : out long optional) : boolean;
true if successful
false otherwise
Parameter | Description |
---|---|
majorVersion | The major version of the operating system |
minorVersion | The minor version of the operating system |
buildNumber | The build number of the operating system |
dcltrans transaction TMain var majorVersion, minorVersion, buildNumber : number; begin if GetOperatingSystemInfo(majorVersion, minorVersion, buildNumber) then Print(string(majorVersion)+" "+string(minorVersion)+" "+string(buildNumber)); end; end TMain;
6 1 7600