CXGRID 獲取選取行的值(轉)

最新推荐文章于 2021-07-19 23:30:29 发布

dongmingho

最新推荐文章于 2021-07-19 23:30:29 发布

阅读量1k

点赞数

分类专栏： CXGRID

本文链接：https://blog.csdn.net/dongmingho/article/details/3116450

版权

CXGRID 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

方法一：
使用函数GetRowValue
此方法在表格过滤、排序后也正常
procedure TfrmBillExtraction.pmGetBill_D_DatasClick(Sender: TObject);
var
I,J : Integer;
begin
with cxGDBTV_Bill_M.DataController,cxGDBTV_Bill_M.DataController.DataSet do
begin
    for I := 0 to GetSelectedCount-1 do
    begin
      J := GetSelectedRowIndex(I);
      //取选中行，列名为sMergeNO的值
      ShowMessage(Trim(GetRowValue(GetRowInfo(J),FieldByName('sMergeNo').Index)));
    end;
end;
end;

方法二：
使用函数：GetValue
此方法开了过滤、排序后不正常，请大家注意。
procedure TfrmBillExtraction.pmGetBill_D_DatasClick(Sender: TObject);
var
I,J : Integer;
begin
with cxGDBTV_Bill_M.DataController,cxGDBTV_Bill_M.DataController.DataSet do
begin
    for I := 0 to GetSelectedCount-1 do
    begin
      J := GetSelectedRowIndex(I);
      //取选中行，列名为sMergeNO的值
      ShowMessage(Trim(GetValue(J,FieldByName('sMergeNo').Index)));
    end;
end;
end;