如何是窗体获得输入焦点？

刚才编了个小程序，点击窗体1上的按钮生成窗体2，点击窗体2上的按钮show窗体1
但是此时对窗体1不能进行任何操作，怎么才能使窗体1此时有输入焦点？
谢谢！

解决方案 »

  1.   

    我刚才用了
    form1.show;
    form1.SetFocus;
    还是不行啊，还能是那里出问题了呢？
    谢谢了！
      

  2.   

    直接指定某个组件获得焦点
    form?.text(或其它).setfocus
      

  3.   

    procedure TForm2.Button2Click(Sender: TObject);
    begin
         Form1.Show;
         Form1.Button1.SetFocus;
    end;
    用这个之后点击Button2之后只能出现窗体2，对上面的Button1还是不能点。
    快哭了！
      

  4.   

    应该可以的..form2不会是模式窗体吧
      

  5.   

    很有可能，form2是showmodal出来的
      

  6.   

    多谢cLich()和logne两位大哥了，form2是showmodal出来的，我改成show的就什么都行了
    谢谢了！