Delphi:如何解决Form的父级是ScrollBox的点击问题?

时间:2016-07-30 13:24:01

标签: delphi

我用2表格创建了一个项目。 TForm1(主要形式)和TForm2。在Form1上我们有一个ScrollBox。在Form2上我们有2个TEdit。在Form1的OnCreate中,我们有以下代码。

procedure TForm1.FormCreate(Sender: TObject);
var
  frm:TForm2;
begin
  frm:=TForm2.Create(ScrollBox1);
  frm.Parent:=ScrollBox1;
  frm.Show;
end;

当我运行程序时,我在Scrollbox1中看到了TForm2的一个实例。一切都很好看。当鼠标悬停关闭或最小化或最大化按钮或表单上的任何其他按钮时,一切似乎都正常。但是当单击一个编辑或任何其他具有键入能力的组件时,焦点不能转到该TEdit或组件。只有当我右键单击该组件时,焦点才会转移到它。

有可能解决这个问题吗?如果是,我该怎么办?

和MDIForm无法帮助我。因为我需要不止一种能够在其中托管其他形式的形式。和delphi似乎不支持mdiForm用于非mainForms。如果关于点击的这个问题可以解决,我认为管理一些表格来托管其他表格是个不错的选择。

0 个答案:

没有答案