BuildNumber: Integer;
The BuildNumber property returns number of operating system build.
For example, if operating system version is 5.1.2600, build number is 2600.
NOTE. The property is outdated.
Executing the example requires a form, the Button1 button on it and the Memo component named Memo1.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
App: IWinApplication;
OperSysVer: IOperatingSystemVersion;
Lines: IStringList;
Begin
App := WinApplication.Instance;
OperSysVer := App.GetOperatingSystemVersion;
Lines := Memo1.Lines;
Lines.Clear;
Lines.Add("Major OS version: " + OperSysVer.MajorVersion.ToString);
Lines.Add("Minor OS version: " + OperSysVer.MinorVersion.ToString);
Lines.Add("Build number: " + OperSysVer.BuildNumber.ToString);
Lines.Add("Update name: " + OperSysVer.CSDVersion);
Lines.Add("Full OS name: " + OperSysVer.FullName);
Lines.Add("OS name: " + OperSysVer.Name);
Lines.Add("OS platform identifier: " + OperSysVer.PlatformId.ToString);
End Sub Button1OnClick;
Clicking the button adds operating system information to the Memo1 component.
See also: