delphi - 如何在 Delphi 7 中使用现有表单作为选项卡

Question

我的 Delphi 7 应用程序包含我已经制作的多个表单。我现在想让每个单独的表单出现在单个容器表单的单独选项卡中。因为我是 Delphi 的新手，所以我不知道该采取什么方法，那么 Delphi 中可以使用哪些方法来完成此任务？

谢谢你。

Answer 1

1. 创建页面控件，TPageControl。
2. 添加 7 页。
3. 创建 7 个表单。
4. 将每个表单添加到其选项卡中。

最后一步如下:

Form1.Parent := TabSheet1;
Form1.Align := alClient;
Form1.BorderStyle := bsNone;
Form1.ParentBackground := True;

由于您要对 7 个表单和 7 个选项卡执行此操作，因此您需要在数组中执行此操作，并将上面的代码提取到方法中。