delphi - 在Normal Form下创建MDIForm，并在MDIForm Error下打开一个MDI Child

Question

这是我的第一个主题

在同一应用程序中:

我有一个 NormalForm(Mainform)，在 Popupmenu 中调用 MDIForm，如下所示:

MDIForm:=TMDIForm.Create(nil);
MDIForm.Show;

表单正确打开...现在，在 MDI 表单中，我尝试使用以下命令创建 MDIChild:

  fm := TMDIChild.Create(Self);
  fm.FormStyle:=fsMDIChild;
  fm.Show;

检索错误:无法创建表单。当前没有事件的 MDI 表单

有人知道怎么做吗？!

Answer 1

你不能像这样混合表单样式。 MDI 子窗体期望应用程序的主窗体是 MDI 窗体。 VCL 的代码不会查看创建子级时是否有任何 MDI 表单可用。