Delphi - Firemonkey将文本写入TRectangle

Question

对Firemonkey来说还是一个新手。有一个组件我正在添加到一个从TRectangle下降的表单。一旦我把它画出来，我想在其中添加文字，但我真的很难找到哪些文档如何做到这一点。任何人都可以提出任何建议或指出我正确的方向吗？

由于

Answer 1

为了构建DSM的注释，这是一个如何在代码中将TLabel添加到TRectangle（或TRectangle后代）的示例：

var
  MyLabel: TLabel;
begin
  // Create a TLabel and add it to an existing TRectangle
  MyLabel := TLabel.Create(MyRectangle);

  // Set the Parent to MyRectangle
  MyLabel.Parent := MyRectangle;

  // Align the TLabel in the center of the TRectangle
  MyLabel.Align := TAlignLayout.Center;

  // Center align the text in the TLabel
  MyLabel.TextAlign := TTextAlign.Center;

  // Set the text for the label
  MyLabel.Text := 'Test Label';
end;