Delphi 如何使手动对接无缝/不可见？

我试图使用停靠作为将（）a

TForm

嵌入

TWinControl

（在本例中是a

TTabSheet

）的替代方法

用户不应该注意到有两种不同的表单

如何避免停靠窗体顶部的关闭按钮和“拖动栏”

我的代码的简化版本：

var
  TabSheet: TTabSheet;
  Form: TSubForm;
begin
  TabSheet             := TTabSheet.Create(Self);
  TabSheet.DockSite    := True;
  TabSheet.PageControl := MainPageControl;

  Form := TSubForm.Create(TabSheet);
  Form.ManualDock(TabSheet);
  Form.Show;
end;

PS：我不想使用

TFrame

，这当然是另一种选择

更新：

在这种特定情况下，我现在考虑使用

TTabControl

而不是

TPageControl

，以便将所有控件放入主窗体

---

无论如何，我都在使用MVC/MVA，因此逻辑与UI分离。

您的代码在我的Delphi 2007中运行良好-页面中没有可见的窗口标题control@gabr：你说得对，实际上我的代码在标签页和子表单之间有一个

TPanel

是由某个第三方（DevExpress）代码绘制的。您应该删除此问题。我正在投票关闭此问题，该代码可能对搜索类似问题的人仍然有用。