在cxGrid表格中如何获得当前列的字段名

 var

   GridDBTableView:TcxGridDBTableView;

   ColIndex:Integer;

   FieldName:string;

    begin

   GridDBTableView := TcxGridDBTableView(TcxGridSite(TcxButtonEdit(Sender).Parent).ViewInfo.GridView);

   ColIndex := TcxGridTableController(TcxGridSite(TcxButtonEdit(Sender).Parent).ViewInfo.GridView.Controller).FocusedColumn.Index;

   FieldName := GridDBTableView.Columns[ColIndex].DataBinding.FieldName;

 end;