如何获得cxgrid的列名 某字段值 单…

procedureTForm_Child_Record.cxGrid1DBTableView1CellDblClick(
  Sender: TcxCustomGridTableView; ACellViewInfo:TcxGridTableDataCellViewInfo;
  AButton: TMouseButton; AShift: TShiftState; varAHandled: Boolean);
var
    v :Variant;
begin
  v := ACellViewInfo.Value;
  //获取字段名
 //ShowMessage(VarToStr(v)); //当前单元格的值
  ShowMessage(Form_Data.MQContent.FieldByName('co_quan').AsString);  //所对应的值
  ShowMessage(cxGrid1DBTableView1.Columns[ACellViewInfo.Item.Index].Caption); //列标题  

   ShowMessage(cxGrid1DBTableView1.Columns[ACellViewInfo.Item.Index].FieldName);//列字段FieldName

  ShowMessage(ACellViewInfo.GridRecord.Values[0]) //行对应的 第一列的值
end;