System.SysUtils.TOSVersion
Delphi
TOSVersion = record
public type
TArchitecture = (arIntelX86, arIntelX64, arARM32, arARM64);
TPlatform = (pfWindows, pfMacOS, pfiOS, pfAndroid, pfWinRT, pfLinux);
public const
AllArchitectures = [arIntelX86, arIntelX64, arARM32, arARM64];
AllPlatforms = [pfWindows, pfMacOS, pfiOS, pfAndroid, pfWinRT, pfLinux];
private
class var FArchitecture: TArchitecture;
class var FBuild: Integer;
class var FMajor: Integer;
class var FMinor: Integer;
class var FName: string;
class var FPlatform: TPlatform;
class var FServicePackMajor: Integer;
class var FServicePackMinor: Integer;
class constructor Create;
public
class function Check(AMajor: Integer): Boolean; overload; static; inline;
class function Check(AMajor, AMinor: Integer): Boolean; overload; static; inline;
class function Check(AMajor, AMinor, AServicePackMajor: Integer): Boolean; overload; static; inline;
class function ToString: string; static;
class property Architecture: TArchitecture read FArchitecture;
class property Build: Integer read FBuild;
class property Major: Integer read FMajor;
class property Minor: Integer read FMinor;
class property Name: string read FName;
class property Platform: TPlatform read FPlatform;
class property ServicePackMajor: Integer read FServicePackMajor;
class property ServicePackMinor: Integer read FServicePackMinor;
end;
C++
struct DECLSPEC_DRECORD TOSVersion
{
public:
enum DECLSPEC_DENUM TArchitecture : unsigned char { arIntelX86, arIntelX64, arARM32, arARM64 };
enum DECLSPEC_DENUM TPlatform : unsigned char { pfWindows, pfMacOS, pfiOS, pfAndroid, pfWinRT, pfLinux };
public:
#define TOSVersion_AllArchitectures (System::Set<TArchitecture, TArchitecture::arIntelX86, TArchitecture::arARM64>() << TArchitecture::arIntelX86 << TArchitecture::arIntelX64 << TArchitecture::arARM32 << TArchitecture::arARM64 )
#define TOSVersion_AllPlatforms (System::Set<TPlatform, TPlatform::pfWindows, TPlatform::pfLinux>() << TPlatform::pfWindows << TPlatform::pfMacOS << TPlatform::pfiOS << TPlatform::pfAndroid << TPlatform::pfWinRT << TPlatform::pfLinux )
private:
static TArchitecture FArchitecture;
static int FBuild;
static int FMajor;
static int FMinor;
static System::UnicodeString FName;
static TPlatform FPlatform;
static int FServicePackMajor;
static int FServicePackMinor;
private:
public:
static bool __fastcall Check(int AMajor)/* overload */;
static bool __fastcall Check(int AMajor, int AMinor)/* overload */;
static bool __fastcall Check(int AMajor, int AMinor, int AServicePackMajor)/* overload */;
static System::UnicodeString __fastcall ToString();
/* static */ __property TArchitecture Architecture = {read=FArchitecture};
/* static */ __property int Build = {read=FBuild};
/* static */ __property int Major = {read=FMajor};
/* static */ __property int Minor = {read=FMinor};
/* static */ __property System::UnicodeString Name = {read=FName};
/* static */ __property TPlatform Platform = {read=FPlatform};
/* static */ __property int ServicePackMajor = {read=FServicePackMajor};
/* static */ __property int ServicePackMinor = {read=FServicePackMinor};
private:
};
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
record struct |
public | System.SysUtils.pas System.SysUtils.hpp |
System.SysUtils | System.SysUtils |
Description
Décrit le système d'exploitation en cours : la plate-forme et la version.
Utilisez TOSVersion pour obtenir des informations sur le système d'exploitation en cours, telles que :
- Plate-forme (Windows ou MAC OS X)
- Version
Autres informations :
- Architecture (Intel x86 ou Intel x64)
- Service pack installé
Exemple :
Writeln(TOSVersion.ToString);
Sortie possible :
Windows XP Service Pack 3 (Version 5.1, Build 2600, 32-bit Edition)
Vous ne pouvez pas créer des variables TOSVersion. TOSVersion représente les données statiques (globales) initialisées au démarrage de l'application.
TOSVersion fournit des méthodes de vérification de la version du système d'exploitation. Voir les surcharges de Check.