dxdbgDocList.DataSource.DataSet.FieldByName('SEQ').AsInteger

解决方案 »

  1.   

    procedure TForm1.cxGrid1DBTableView1ColumnHeaderClick(
      Sender: TcxGridTableView; AColumn: TcxGridColumn);
    beginend;
      

  2.   

    procedure TForm1.cxGrid1DBTableView1ColumnHeaderClick(
      Sender: TcxGridTableView; AColumn: TcxGridColumn);
    begin
      showmessage(AColumn.Caption);
    end;
      

  3.   

    procedure TForm1.DBGrid1DblClick(Sender: TObject);
    begin
      Caption := Format('当前单元格是第%d列,第%d行',[TDrawGrid(DBGrid1).Col,TDrawGrid(DBGrid1).Row]);
    end;
      

  4.   

    或者这样:procedure TForm1.DBGrid1DblClick(Sender: TObject);
    begin
      Caption := IntToStr(DBGrid1.SelectedIndex);//只不过这是从0开始的,0是第一列
    end;
      

  5.   

    procedure TForm1.cxTableviewCellDblClick(Sender: TcxCustomGridTableView;
      ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
      AShift: TShiftState; var AHandled: Boolean);
    begin
            if cxTableview.Columns1.Focused then  
               //弹出窗口代码
    end;先把 cxTableview.OptionsBehavior.ImmediateEditor 设置为False