cxGrid 动态创办的列中设置某一列为按钮，再通过按钮点击触发事件

cxGrid 动态创建的列中设置某一列为按钮，再通过按钮点击触发事件
void __fastcall THyperSrchForm::tvSearchEditing(
  TcxCustomGridTableView *Sender, TcxCustomGridTableItem *AItem,
  bool &AAllow)
{
  AAllow=false;
  if(Edit1->Text=="aaa")
  {
  if(tvSearch->Columns[AItem->Index]->Caption=="bbb"
  tvSearch->Columns[AItem->Index]->PropertiesClassName="TcxButtonEditProperties";
  }
}

设为按钮后，因为是动态创建的列，在TcxGridDBTableView里没有列名，所以没有Button事件，该怎么样触发该列的按钮事件呢？

------解决方案--------------------
貌似有人写过delphi的，看对楼主是否有帮助

cxcolumn:=cxGrid1DBTableView1.CreateColumn; PropertiesClass:=TcxButtonEditProperties;
(cxcolumn.Properties as TcxButtonEditProperties).OnButtonClick:=cxbuttonclick;
这样就OK