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