对Firemonkey来说还是一个新手。有一个组件我正在添加到一个从TRectangle下降的表单。一旦我把它画出来,我想在其中添加文字,但我真的很难找到哪些文档如何做到这一点。任何人都可以提出任何建议或指出我正确的方向吗?
由于
答案 0 :(得分:2)
为了构建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;