BuildNumber: Integer;
Свойство BuildNumber возвращает номер сборки операционной системы.
Например, если версия операционной системы - 5.1.2600, то номер сборки будет 2600.
Примечание. Свойство является устаревшим.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента Memo с наименованием «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("Основная версия ОС: " + OperSysVer.MajorVersion.ToString);
Lines.Add("Промежуточная версия ОС: " + OperSysVer.MinorVersion.ToString);
Lines.Add("Номер сборки: " + OperSysVer.BuildNumber.ToString);
Lines.Add("Наименование обновления: " + OperSysVer.CSDVersion);
Lines.Add("Полное наименование ОС: " + OperSysVer.FullName);
Lines.Add("Наименование ОС: " + OperSysVer.Name);
Lines.Add("Идентификатор платформы ОС: " + OperSysVer.PlatformId.ToString);
End Sub Button1OnClick;
При нажатии на кнопку в компонент «Memo1» будет добавлена информация об операционной системе.
См. также: