New Platform Identifiers in RAD Studio, Delphi and C++Builder 11 Alexandria

I was looking through the “What’s New in version 11 Alexandria” and found a cool tidbit about small changes in the RTL for “Platform Identifiers“. Using these platform identifiers can help in your cross platform development projects. Ensuring that all of the platform related identifiers use a consistent naming pattern will also help in your programming efforts.

The RTL adds a new platform identifier, pidOSXArm64 for the macOS/Arm64 platform.
The existing pidAndroid32Arm and pidAndroid64Arm identifiers are replaced by the
new pidAndroidArm32 and pidAndroidArm64.
Now, all platform related identifiers use the same format and order of the compilers:
   <Platform name> <Architecture name> <Bitness>

The RTL adds a new platform identifier, pidOSXArm64 for the macOS/Arm64 platform.

The existing pidAndroid32Arm and pidAndroid64Arm identifiers are replaced by the

new pidAndroidArm32 and pidAndroidArm64.

Now, all platform related identifiers use the same format and order of the compilers:

You will find the new platform identifiers in the System.Classes.pas and System.Classes.hpp files. Note: a few of the platform identifiers are now marked with the deprecated attribute.

C++Builder note: In the screen grab above, I used the “Classic” C++ compiler to display the deprecated warning message in the Message Window. In the DocWiki there is a note about workarounds in using the Clang-enhanced compilers and deprecated attributes. The DocWiki entry says to “use #pragma obsolete as a workaround for the deprecated attribute.”

System.Classes.pas

  { Platform identifiers }
  pidWin32          = $00000001;
  pidWin64          = $00000002;
  pidOSX32          = $00000004;
  pidiOSSimulator32 = $00000008;
  pidiOSSimulator   = pidiOSSimulator32 deprecated 'Use pidiOSSimulator32';
  pidAndroidArm32   = $00000010;
  pidAndroid32Arm   = pidAndroidArm32 deprecated 'Use pidAndroidArm32';
  pidAndroid        = pidAndroidArm32 deprecated 'Use pidAndroidArm32';
  pidLinux32        = $00000020;
  pidiOSDevice32    = $00000040;
  pidiOSDevice      = pidiOSDevice32 deprecated 'Use pidiOSDevice32';
  pidLinux64        = $00000080;

  pidWinNX32        = $00000100;
  pidWinIoT32       = $00000200; // Embedded IoT (Internet of Things) Windows w/ Intel Galileo
  pidiOSDevice64    = $00000400;
  pidWinARM32       = $00000800;
  pidWin32ARM       = pidWinARM32 deprecated 'Use pidWinARM32';
  pidOSX64          = $00001000;
  pidLinuxArm32     = $00002000;
  pidLinuxArm64     = $00004000;
  pidAndroidArm64   = $00008000;
  pidAndroid64Arm   = pidAndroidArm64 deprecated 'Use pidAndroidArm64';

  pidiOSSimulator64 = $00010000;

  pidOSXArm64       = $00020000;
  pidWinArm64       = $00040000;
  pidiOSSimulatorArm64 = $00080000;

  pidAllPlatforms = pidWin32 or pidWin64 or
                    pidOSX32 or pidOSX64 or pidOSXArm64 or
                    pidiOSDevice32 or pidiOSDevice64 or
                    pidiOSSimulator32 or pidiOSSimulator64 or
                    pidAndroidArm32 or pidAndroidArm64 or
                    pidLinux64;

  { Platform family identifiers }
  pfidWindows     = pidWin32 or pidWin64;
  pfidOSX         = pidOSX32 or pidOSX64 or pidOSXArm64;
  pfidiOS         = pidiOSDevice32 or pidiOSDevice64 or
                    pidiOSSimulator32 or pidiOSSimulator64;
  pfidAndroid     = pidAndroidArm32 or pidAndroidArm64;
  pfidLinux       = pidLinux64;

System.Classes.pas

{ Platform identifiers }

pidWin32 = $00000001;

pidWin64 = $00000002;

pidOSX32 = $00000004;

pidiOSSimulator32 = $00000008;

pidiOSSimulator = pidiOSSimulator32 deprecated 'Use pidiOSSimulator32';

pidAndroidArm32 = $00000010;

pidAndroid32Arm = pidAndroidArm32 deprecated 'Use pidAndroidArm32';

pidAndroid = pidAndroidArm32 deprecated 'Use pidAndroidArm32';

pidLinux32 = $00000020;

pidiOSDevice32 = $00000040;

pidiOSDevice = pidiOSDevice32 deprecated 'Use pidiOSDevice32';

pidLinux64 = $00000080;

pidWinNX32 = $00000100;

pidWinIoT32 = $00000200; // Embedded IoT (Internet of Things) Windows w/ Intel Galileo

pidiOSDevice64 = $00000400;

pidWinARM32 = $00000800;

pidWin32ARM = pidWinARM32 deprecated 'Use pidWinARM32';

pidOSX64 = $00001000;

pidLinuxArm32 = $00002000;

pidLinuxArm64 = $00004000;

pidAndroidArm64 = $00008000;

pidAndroid64Arm = pidAndroidArm64 deprecated 'Use pidAndroidArm64';

pidiOSSimulator64 = $00010000;

pidOSXArm64 = $00020000;

pidWinArm64 = $00040000;

pidiOSSimulatorArm64 = $00080000;

pidAllPlatforms = pidWin32 or pidWin64 or

pidOSX32 or pidOSX64 or pidOSXArm64 or

pidiOSDevice32 or pidiOSDevice64 or

pidiOSSimulator32 or pidiOSSimulator64 or

pidAndroidArm32 or pidAndroidArm64 or

pidLinux64;

{ Platform family identifiers }

pfidWindows = pidWin32 or pidWin64;

pfidOSX = pidOSX32 or pidOSX64 or pidOSXArm64;

pfidiOS = pidiOSDevice32 or pidiOSDevice64 or

pidiOSSimulator32 or pidiOSSimulator64;

pfidAndroid = pidAndroidArm32 or pidAndroidArm64;

pfidLinux = pidLinux64;

System.Classes.hpp

static const System::Int8 pidWin32 = System::Int8(0x1);
static const System::Int8 pidWin64 = System::Int8(0x2);
static const System::Int8 pidOSX32 = System::Int8(0x4);
static const System::Int8 pidiOSSimulator32 = System::Int8(0x8);
static const System::Int8 pidiOSSimulator _DEPRECATED_ATTRIBUTE1("Use pidiOSSimulator32")  = System::Int8(0x8);
static const System::Int8 pidAndroidArm32 = System::Int8(0x10);
static const System::Int8 pidAndroid32Arm _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm32")  = System::Int8(0x10);
static const System::Int8 pidAndroid _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm32")  = System::Int8(0x10);
static const System::Int8 pidLinux32 = System::Int8(0x20);
static const System::Int8 pidiOSDevice32 = System::Int8(0x40);
static const System::Int8 pidiOSDevice _DEPRECATED_ATTRIBUTE1("Use pidiOSDevice32")  = System::Int8(0x40);
static const System::Byte pidLinux64 = System::Byte(0x80);
static const System::Word pidWinNX32 = System::Word(0x100);
static const System::Word pidWinIoT32 = System::Word(0x200);
static const System::Word pidiOSDevice64 = System::Word(0x400);
static const System::Word pidWinARM32 = System::Word(0x800);
static const System::Word pidWin32ARM _DEPRECATED_ATTRIBUTE1("Use pidWinARM32")  = System::Word(0x800);
static const System::Word pidOSX64 = System::Word(0x1000);
static const System::Word pidLinuxArm32 = System::Word(0x2000);
static const System::Word pidLinuxArm64 = System::Word(0x4000);
static const System::Word pidAndroidArm64 = System::Word(0x8000);
static const System::Word pidAndroid64Arm _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm64")  = System::Word(0x8000);
static const int pidiOSSimulator64 = int(0x10000);
static const int pidOSXArm64 = int(0x20000);
static const int pidWinArm64 = int(0x40000);
static const int pidiOSSimulatorArm64 = int(0x80000);
static const int pidAllPlatforms = int(0x394df);
static const System::Int8 pfidWindows = System::Int8(0x3);
static const int pfidOSX = int(0x21004);
static const int pfidiOS = int(0x10448);
static const System::Word pfidAndroid = System::Word(0x8010);
static const System::Byte pfidLinux = System::Byte(0x80);

System.Classes.hpp

static const System::Int8 pidWin32 = System::Int8(0x1);

static const System::Int8 pidWin64 = System::Int8(0x2);

static const System::Int8 pidOSX32 = System::Int8(0x4);

static const System::Int8 pidiOSSimulator32 = System::Int8(0x8);

static const System::Int8 pidiOSSimulator _DEPRECATED_ATTRIBUTE1("Use pidiOSSimulator32") = System::Int8(0x8);

static const System::Int8 pidAndroidArm32 = System::Int8(0x10);

static const System::Int8 pidAndroid32Arm _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm32") = System::Int8(0x10);

static const System::Int8 pidAndroid _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm32") = System::Int8(0x10);

static const System::Int8 pidLinux32 = System::Int8(0x20);

static const System::Int8 pidiOSDevice32 = System::Int8(0x40);

static const System::Int8 pidiOSDevice _DEPRECATED_ATTRIBUTE1("Use pidiOSDevice32") = System::Int8(0x40);

static const System::Byte pidLinux64 = System::Byte(0x80);

static const System::Word pidWinNX32 = System::Word(0x100);

static const System::Word pidWinIoT32 = System::Word(0x200);

static const System::Word pidiOSDevice64 = System::Word(0x400);

static const System::Word pidWinARM32 = System::Word(0x800);

static const System::Word pidWin32ARM _DEPRECATED_ATTRIBUTE1("Use pidWinARM32") = System::Word(0x800);

static const System::Word pidOSX64 = System::Word(0x1000);

static const System::Word pidLinuxArm32 = System::Word(0x2000);

static const System::Word pidLinuxArm64 = System::Word(0x4000);

static const System::Word pidAndroidArm64 = System::Word(0x8000);

static const System::Word pidAndroid64Arm _DEPRECATED_ATTRIBUTE1("Use pidAndroidArm64") = System::Word(0x8000);

static const int pidiOSSimulator64 = int(0x10000);

static const int pidOSXArm64 = int(0x20000);

static const int pidWinArm64 = int(0x40000);

static const int pidiOSSimulatorArm64 = int(0x80000);

static const int pidAllPlatforms = int(0x394df);

static const System::Int8 pfidWindows = System::Int8(0x3);

static const int pfidOSX = int(0x21004);

static const int pfidiOS = int(0x10448);

static const System::Word pfidAndroid = System::Word(0x8010);

static const System::Byte pfidLinux = System::Byte(0x80);

Interested in using Embarcadero’s IDE Software? It will help you Build Apps 5x Faster With One Codebase for Windows, Android, iOS, macOS, and Linux. Request a free trial here.

Reduce development time and get to market faster with RAD Studio, Delphi, or C++Builder.
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today

Free Delphi Community Edition Free C++Builder Community Edition

2 Comments


daveboltuk

December 31, 2021 at 9:33 am

This sounds really useful but I’m having some trouble with documentation.
I can find the definitions in System.Classes.pas (Delphi), but in the same unit I see use of
$IFDEF MSWINDOWS
$IFDEF ANDROID
and so on.
Can you point to some additional discussion?
- Reply
  
  Ian Barker
  
  January 2, 2022 at 10:09 am
  
  These kind of compiler directives (as they are called) allow you to have blocks of code which will only get compiled into your apps if they evaluate to true.
  
  So, for example:
  
  {$IDEF ANDROID} // Do something here which you only want to execute when the program is compiled for an Android device... {$ENDIF}
  
  The full set of directives which you can use can be found here: https://docwiki.embarcadero.com/RADStudio/Sydney/en/Conditional_compilation_(Delphi)

New Platform Identifiers in RAD Studio, Delphi and C++Builder 11 Alexandria

2 Comments

Leave a ReplyCancel reply

Search

Something Fresh

Instruction Sets in C++Builder 12.3!

New in 12.3: Scripts for Migration from InterBase Express to FireDAC

RAD Server Gets a Boost in RAD Studio 12.3

Popular Posts

RAD Studio 12.2 Athens Inline Patch 1 Available

Announcing the Availability of RAD Studio 12.2 Athens

New in 12.3: Scripts for Migration from InterBase Express to FireDAC

AI-Powered Smart CodeInsight in RAD Studio 12.3

Announcing the Availability of RAD Studio 12.3 Athens

RAD Studio 12.2 Athens Inline Patch 1 Available

Announcing the Availability of RAD Studio 12.2 Athens

New in 12.3: Scripts for Migration from InterBase Express to FireDAC

AI-Powered Smart CodeInsight in RAD Studio 12.3

Categories

Popular From News

New in 10.3.2: C++17 for Win64 - target all Windows with the C++17 Clang compiler

Delphi 12 And C++Builder 12 Community Editions Released!

We've Updated The HUGE Delphi Anniversary “Innovation Timeline” Infographic. Grab it Now!

Embarcadero InterBase 2020 Update 6 Released!

3 x 12 VCL Enhancements in Delphi 12

C++Builder @ stackoverflow

Delphi @ stackoverflow

InterBase @ stackoverflow

Categories

Useful Links

Follow us

New Platform Identifiers in RAD Studio, Delphi and C++Builder 11 Alexandria

2 Comments

Leave a ReplyCancel reply

Join Our Global Developer Community

Search

Something Fresh

Popular Posts

Categories

Popular From News

Categories

Useful Links

Follow us