如何在程序启动的时候不执行某个事件？？？？？？？？？？？？？？？？

Question

如题

Answer 1

严重影响程序的启动速度。阻止onColWidthsChanged事件的执行。谢

Answer 2

定义一个变量判断是不是启动，是则exit
onColWidthsChanged

Answer 3

不要在onColWidthsChanged中写死内容
在需要时动态对onColWidthsChanged赋值，

Answer 4

proceduer TForm1.FormCreate(Sender: TObject);
begin
  XX.onColWidthsChanged := nil;
  .
  .//你需要执行的代码如果可能触发该事件
  .
  XX.onColWidthsChanged := XXColWidthsChanged;
end;

Answer 5

在project->options->auto create forms 中设一下你要哪个自动创建就留下哪个其余的放在右面用的时候create一下，再free  一下。见笑了。