我一直在寻找如何创建多个标签页,其中我创建的每个标签页都包含相同的组件。我了解如何创建新的标签页,但我需要的是制作标签页及其所有子组件。
我试图创建一个TForm实例并将TForm粘贴到标签页中,但只有这些表单附在标签页上。没有他们的孩子组件。
这是我的编程代码:
procedure TmPenjualan.Button1OnClick(Sender: TObject);
var
Tab: TTabSheet;
FormT: TForm;
FrameT: TFrame;
begin
Tab := TTabSheet.Create(PageControlParent);
Tab.PageControl := PageControlParent;
FormT := TForm1.CreateNew(Tab);
FormT.Parent := Tab;
FormT.Show;
end;
如果我错了,请帮我提供具体的示例代码。提前致谢