如何在运行时创建的 Tgrid 中为列命名并在行中填充数据； (德尔福)

Question

我是使用 Embarcadero® RAD Studio 10 Seattle 的 Delphi Firemonkey 的新手。 我在运行时创建一个Tgrid 。 如何给列命名并在行中填充数据？ 我的代码如下。

procedure TForm1.Button1Click(Sender: TObject);
var
  Grid : TGrid;
begin
  Grid := TGrid.Create(Form1);
  Grid.Visible := True;
  Grid.Parent := Form1;
  Grid.Align := Grid.Align.alClient;
  Grid.RowCount := 5;
end;

Answer 1

如果按名称表示在列顶部可见的标题，则：

每列（您还必须创建）是某种类型的 TColumn（例如 TStringColumn）。 TColumn 有一个 Header 属性（一个字符串），您可以设置它，它指定列的 header 单元格中的字符串。

请参阅http://docwiki.embarcadero.com/Libraries/Seattle/en/FMX.Grid.TColumn.Header