TclLayout

function AddNewLayout(AComponent: TCLComponent; xName: string): TclLayout;

AComponent : Specifies the parent of the object to be defined.

xName : The name of the defined layout should be written.

It is used to arrange other components on the form. Simply put, it is used to organize buttons, labels, and other visual elements in a specific layout on a form. This layout automatically adjusts the size and position of the components, making the form appear more organized and aesthetically pleasing. TclLayout is particularly useful when creating dynamic user interfaces and adapting to different screen sizes.

The features and usage are provided in the table below.

Feature	Use of	Definition
TclLayout	Layout1 : TclLayout;	A variable belonging to the TclLayout class is created.
AddNewLayout	Layout1 = Form1.AddNewLayout(Form1,'Layout1');	A new TclLayout is added to the form.
AutoResize	Layout1.AutoResize = clVertical;	Enables automatic resizing of a component based on its content. This feature allows resizing horizontally (clHorizontal) or vertically (clVertical) and can be adjusted as needed.
Width	Layout1.Width = 150;	Allows adjusting the width of the layout.
Height	Layout1.Height = 50;	Allows adjusting the height of the layout.
Align	Layout1.Align = alTop;	With the Align parameter, you can specify where you want our component to be aligned in the form. This parameter has multiple positioning properties. See the page to learn about these features.
Margins	Layout1.Margins.Left = 50; // Right, Top, Bottom	With the Margins parameter, you can give margins at any scale from the right, left, bottom, top.

Example

 Var   
   MyForm:TclForm;
   Panel1 : TclPanel;
   Layout1 : TclLayout;
   Edit1 : TclEdit;
 
 {
 
   MyForm=TclForm.Create(self);
    
   Panel1=MyForm.AddNewPanel(MyForm,'Panel1');
   Panel1.Align=ALTop;
   Panel1.Height=100;
    
   Layout1 = MyForm.AddNewLayout(Panel1,'Layout1');
   Layout1.Align=ALCenter;
   Layout1.Height = 50;
   
   Edit1 = MyForm.AddNewEdit(Layout1,'Edit1','Write something...');
   Edit1.Align=aLLeft;
   Edit1.Width = 150;
    
   MyForm.Run;
 
 }

Output:

See Also

• Components
• Object Properties
• AddNewEvent