Delphi X3 中 Firemonkey 应用程序的主 TForm3D 窗口有一个Context:TContext3D
让我可以访问当前使用的设备。
在我使用 Windows7 64 的情况下,它始终显示TDX10Context
来自FMX.Context.DX10.pas
.
我没有TDX9Context
从 FMX.Context.DX9.pas 的类创建新实例的可见性,只是为了查看祖先TCustomDX9Context
。
我找到了TContextManager
在严格私有中收集注册的 3D 上下文的类TList
:(,这是唯一可以调用构造函数的类...
{ Don't call contructor directly from TContext - only using TContextManager class }
constructor CreateFromWindow(const AParent: TFmxHandle; const AWidth, AHeight: Integer;`
TContextManager
他们在创建新表单时调用以获取上下文,然后使用只读属性TContextManager.DefaultContextClass
。
除了DefaultContextClass
.