我想做一些我想做的事情.我有一些很大的形式,需要一些时间来创建.为了使应用程序加载速度更快,我想让表单在主窗体的OnCreate事件中创建的线程中创建.该线程有一个TApplication类型的FApplication字段,它显然是Application变量.我用它来创建线程上的表单,但即使我尝试过
FApplication.CreateForm (TfrmXXX, frmXXX)
和
frmXXX := TFrmXXX.Create(FApplication)
表格仍未创建.这有什么解决方法吗?
提前致谢.
在线程中创建表单根本不起作用.VCL,尤其是可视部分,不是线程安全的.放弃这个想法,而是优化导致表单需要很长时间才能创建的代码.你还没有告诉我们缓慢的部分是什么.如果你能回答这个问题,也许我们可以建议一种加快速度的方法.
通常,在对其进行分析并确切知道问题所在之前,不可能很好地改进代码的性能.否则,你只是在浪费你的时间.
解决方案并不容易,因为
Delphi VCL不是线程安全的
在另一个线程中创建窗口需要相应的线程有一个消息循环
你一次需要所有的表格吗?如果没有,您可以将创建推迟到应用程序空闲的时间(即TApplicationEvents.OnIdle).或者只是显示一个不错的进度条:)