android - TColorbutton（Delphi XE5 - 移动应用程序）不显示文本属性

Question

我TGridlayout在 FireMonkey 移动应用程序的表单中使用了一个组件。

我想在运行时创建带有颜色、文本和图像的按钮。我正在使用TColorbutton和Timage组件，但TColorbutton只显示图片和颜色。在属性中输入的文本Text不会出现。

如何动态创建按钮（带有颜色、图像和文本）？

Answer 1

您必须在按钮内动态创建一个 Tlabel。示例在这里：

var btn:TColorButton;
var testo:TLabel;

       btn:=TColorButton.Create(panTastiera);
       btn.Width:=200;
       btn.Height:=65;
       btn.Parent:=Form1;
       btn.Position.X:=10;
       btn.Position.Y:=10;

       testo:=TLabel.Create(btn);
       testo.Text:='Button 1';
       testo.OnClick:=btn.OnClick;
       testo.Parent:=btn;
       testo.FontColor:=$ffffff;
       testo.TextAlign:=TTextAlign.Center;
       testo.AutoSize:=true;
       testo.Align:=TAlignLayout.Client;

注意：TColorButton.Create参数中使用的“panTastiera”是主窗体上的一个tpanel

要添加图像，您可以执行相同的操作，动态创建 Timage。如图所示，在我的原始代码中，我创建了一组按钮