Delphi XE2: Is there a predefined conditional to identify VCL and FireMonkey? -
in delphi xe2, have use
{$ifdef win32} {$ifdef win64}
to identify platform in.
is there predefined conditional may identify vcl , fmx?
as others says, there not conditional directive determine if application vcl or firemonkey. think reliable way determine if app firemonkey or vcl using function instead of conditional directive.
something
uses rtti; function isvclapp:boolean; begin result:= comparetext(trtticontext.create.gettype(tapplication.classinfo).qualifiedname,'vcl.forms.tapplication')=0; end; function isfiremonkeyapp:boolean; begin result:= comparetext(trtticontext.create.gettype(tapplication.classinfo).qualifiedname,'fmx.forms.tapplication')=0; end;
Comments
Post a Comment