form1中有一button1按钮
现在希望点击button1后刷新form1
也就是希望让form1中的OnCreate和OnShow代码全部重新执行一遍
请问应该怎么写?

解决方案 »

  1.   

    form.refresh
    oncreate代码要重新执行一遍?恐怕不行吧
      

  2.   

    procedure TForm1.FormShow(Sender: TObject);
    begin
     showmessage('show');
    end;procedure TForm1.Button2Click(Sender: TObject);
    beginform1.OnShow(self);end;
    刚刚给你调试过了,能行通
    OnCreate是建窗体的,有了就不能再建第二次,不过可以show二次
    你把代码写到onshow里吧
      

  3.   

    create只能创建一次,show可以刷新
      

  4.   

    form.refresh
    可以刷新你的onshow 但是你的OnCreate 不可能
    把他粘贴下来从写一下吧