使用timer控件啊
如:procedure Tform1.timer1onclick(sender:tobject);
begin
  button1.click;
  timer1.enabled:=false;
end;其他的?
我也想知道

解决方案 »

  1.   

    to a12345:
       不会吧,用timer?这有点偷机吧!^_^
      

  2.   

    那就在onshow(或者onactive)事件中加入就可以了
      

  3.   

    在show事件中响应旧可以了,很简单的呀!!
      

  4.   

    实际上还是用TTimer比较好。在Timer的OnTimer事件中,首先将Timer的Enabled
    设为false,然后再执行按钮的点击事件。直接在OnShow事件中执行按钮的点击事件时,
    效果和在OnCreate里的效果一样。
      

  5.   

    同意tankkcc(野火) , redlegend_126_com(redlegend) 的说法
      

  6.   

    在窗体体的onshow事件中写入:bitbtn1.click;可以了。
      

  7.   

    在窗体体的onshow事件中写入:bitbtn1.click(bitbtn1);可以了。
    (补充)
      

  8.   

    用onshow 中 Button1Click(Sender);效果不好
    ONPAINT   ......................窗体的状态改变都会执行
    我认为onactive是做好的选择
      

  9.   

    应该就是在OnActivate里调用,form的生成过程是create->show->activate,如果在show里,窗体还没有显示就出消息框了,还是在activate里,这是主窗体已经显示出来了
      

  10.   

    应该就是在OnActivate里调用
    然后设置一个全局变量记录是否已经执行过一次,如果是则不在执行。