如何防止 Delphi MDI 应用程序显示最大化子项的标题

Question

如何防止 Delphi MDI 应用程序在 MDI 父窗体的标题中显示当前最大化的 MDI 子项的标题？

先感谢您！

Answer 1

按照 mghie 的建议调整 Gerry 的答案：

private
  PreviousState: TWindowState;

procedure TMDIChildForm.FormResize(Sender: TObject);
begin
  if PreviousState = wsMaximized then
    Caption := 'Desired Caption'
  else if WindowState = wsMaximized then
    Caption := '';
  PreviousState := WindowState;
end;

Answer 2

你不能。 MDI 已经过时了，并且对它的支持已被弃用（实际上，已经弃用多年了）。 由于弃用，这些限制可能永远不会改变。

Answer 3

还没有机会对此进行测试，但是：

在子 OnResize 中，测试 WindowState = wsMaximized。
如果是，则设置 Caption := ''
如果没有，请根据需要设置标题 - 您需要记住这一点。