Question

我在网上找到了很多解决方案，但由于StringGrid1.ColumnCount peoperty是只读的，因此它们不起作用。我正在使用Delphi 10 Seattle。

我有一个StringGrid1，我需要在运行时添加列。具体来说，我必须根据TList的大小添加列。特别是：

var a: TList<double>;
begin

 //fill the TList...

 for i := 0 to a.Count - 1 do
  begin
   StringGrid1.AddColumn(); //how can I do this?
  end;

end;

我觉得Lazarus很容易（但它当然有FPC）但是在Delphi上我真的不知道该怎么做。我正在研究Firemonkey。

Answer 1

使用网格的AddObject()或InsertObject()方法添加所需TColumn派生类的对象实例，例如TStringColumn。列对象将添加到网格的Columns数组中。 ColumnCount属性只返回数组中的列数，这就是它为只读的原因。

在运行时添加stringgrid列

1 个答案: