两个TForm,
1个上有TPanel.
1个上有TEdit.
建立这两个Form ,并把有Edit的form 显示在另一个的form的panel上。
但用鼠标怎么也进不了edit框!
请教,该如何解决。?

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      //form2.Parent := form1.Panel1;//该方法不建议使用,出现你所说的问题
      form2.Dock(form1.Panel1,panel1.ClientRect);//建议使用停靠
      form2.Show;
    end;
      

  2.   

    不能将焦点落在Edit上主要是因为form2不在激活状态。当前激活窗体为带panel的窗体(form1)
      

  3.   

    procedure TMainForm.newBtnClick(Sender: TObject);
    var
      ChildFrm: TChildFrm;
    begin
      LockWindowUpdate(Handle);
      try
        ChildFrm := TChildFrm.Create(Self);
        //做其它事情。比如执行函数,显示向导等...
      finally
        LockWindowUpdate(0);
      end;
    end;