动态赋值OnClick事件后怎么要点击两下才能触发事件？

Question

小弟给StringGrid控件的OnClick时间动态赋值，格式如: StringGrid.OnClick := MyOnClick；函数的声明等等应该都是没问题的，但是现在我在StringGrid上单击一次只是选中，要在点击一下后才会触发事件。在我没为它赋值前它用原有事件是正常的，不知道原因？哪位能指点一下。

Answer 1

我试过，却一点问题也没有：
procedure TForm1.Button1Click(Sender: TObject);
begin
  StringGrid1.OnClick:= StringGrid1Click;
end;procedure TForm1.StringGrid1Click(Sender: TObject);
begin
ShowMessage('OK');
end;

Answer 2

动态赋值和你直接在Event里面写代码效果是一样的，不可能是这里的原因，找找其他方面的原因吧...

Answer 3

忘了说了，我用的是profgird控件，比StringGrid功能强，大概是控件的问题了