首页 > 解决方案 > 无形应用程序中的 TFDGUIxWaitCursor

问题描述

我成为的错误是:

缺少类 {3E9B315B-F456-4175-A864-B2573C4A2201} 的对象工厂。要注册它,您可以将组件 [TFDGUIxWaitCursor] 拖放到您的项目中

好吧,如果我没有无 VCL(不是控制台)应用程序,我想这样做......

DPR 文件中只有一个“脚本”,仅此而已。

以下没有帮助:

wCur := TFDGUIxWaitCursor.Create(nil);
conn := TFDConnection.Create(nil);
try
  .....
  conn.Connected := True;
  conn.ExecSQL('blah blah blah');
  conn.Connected := False;
finally
  conn.Free();
  wCur.Free();
end;

标签: delphifiredac

解决方案


无需TFDGUIxWaitCursor显式创建。

FireDAC.VCLUI.Wait在您的情况下,包含在uses项目文件的子句中就足够了。所有必要的初始化和完成都在initializationfinalization单元的各个部分中执行。

等待光标的概念在 FireDAC(带有接口IFDGUIxWaitCursor)中被抽象为在 FireMonkey、VCL 和控制台应用程序中工作。因此,在不同的单元中,每种类型都存在不同的实现。根据您的应用程序类型,您必须选择适当的实现。如果您将 FireDAC 组件拖放到表单、框架或数据模块上,设计人员通常会添加正确的组件。

  • 控制台:FireDAC.ConsoleUI.Wait
  • FMX:FireDAC.FMXUI.Wait
  • VCL:FireDAC.VCLUI.Wait

推荐阅读