Delphi TDBGrid列增添按钮

Delphi TDBGrid列添加按钮
在一列上添加一个按钮。数据多少行就添加多少行。
[解决办法]
DBGrid1TitleClick(Column: TColumn);
begin

end;
//这个事件可以触发点击每列列头的事件。