? ? 有时为了使以前的代码可以用在FMX工程中,需要设置编译条件以便使用不同的语句,但是C++Builder没有提供编译条件。在网上查了一些文章,基本都是运行后才能判断是否为FMX或VCL程序。
? ? 为了实现这个功能,只能采取手工定义编译条件,当编译VCL工程时采用
#define _IS_VCL_
? ? 当编译FMX工程时采用
#define _IS_FMX_
? ?这时需要注释掉 //?#define _IS_VCL_
? ? 这种方法暂时满足要求,就是需要手工修改。
? ? 最近看到了一篇文章“Writing Cross Framework code in Delphi”,采用增加编译条件,获取工程文件中的某个变量,就不用手工修改编译条件了。具体配置和用法详见下面的代码:
? ? 在C++ Builder FMX工程中Project | Options | C++ Compiler | Directories and Conditionals | Conditional defines 添加 $(FrameworkType); ? ? 在Delphi FMX工程中Project | Options | Delphi Compiler | Conditional defines 添加 $(FrameworkType); ? ? VCL工程文件.cbproj中有 <FrameworkType>VCL</FrameworkType> 语句。 ?FMX工程文件.cbproj中有 ?<FrameworkType>FMX</FrameworkType>语句。
// 20211025 参考https://www.ideasawakened.com/post/writing-cross-framework-code-in-delphi
// 在C++ Builder FMX工程中Project | Options | C++ Compiler | Directories and Conditionals | Conditional defines 添加 $(FrameworkType);
// 在Delphi FMX工程中Project | Options | Delphi Compiler | Conditional defines 添加 $(FrameworkType);
// VCL工程文件.cbproj中有 <FrameworkType>VCL</FrameworkType> 语句。 FMX工程文件.cbproj中有 <FrameworkType>FMX</FrameworkType>语句。
#ifdef FMX
#define __IS_FMX__
#endif
#ifdef VCL
#define __IS_VCL__
#endif
|