如何通过代码向 DBGrid 添加列?

How to add a column to a DBGrid by code?

使用 TDBGrid,我想添加一个新列并通过代码设置其名称。

如何在运行时执行此操作?

TColumn class 没有 Name 属性。请注意,它不继承自 TComponentTColumn -> TCollectionItem -> TPersistent -> TObject)及其父 classes不要添加任何 Name 属性.

无论如何,您可以通过简单地调用 Columns 集合的 Add 方法向 TDBGrid 添加一个新列:

var
  Col : TColumn;
begin
  Col := DBGrid1.Columns.Add;
  //then you can set its properties as your needs
  Col.Title.Caption := 'MyNewColumn';
end;