TempTab:=TTabSheet. Create (Control_jm);
TempTab. Caption:=cText;
TempTab. Name:=Name;
TempTab. PageControl:=Control_jm;
Control_jm. ActivePage:=TempTab;
This is automatically generated code page


With Tform2. Create (TcxTabSheet (PageControl1 FindComponent (' form2))) do
The begin
ManualDock (TcxTabSheet (PageControl1 FindComponent (' form2)));
The Show;
end;

I put form2 PageControl1 inside, I that how form2 from a trip to the other Windows controls?

Direct form2. The Caption is not enough. The content is empty;

TButton (FindComponent (name)). * * this poor effect is good

CodePudding user response:

I also a headache for this problem, there has been no find the answer

CodePudding user response:

 
Var 
Form2: Tform; 

Form2:=Tform2. Create (TcxTabSheet (PageControl1. FindComponent (' Form2))); 
ManualDock (Form2); 
Form2. Show;