CXGRID用法(取行、列值;定位选中某行等等)[转]

Delphi Cxgrid获取选中行列,排序规则,当前正在编辑的单元格内的值

cxGrid1DBTableView1.Controller.FocusedRowIndex 当前行号

cxGrid1DBTableView1.Controller.FocusedRow 当前行
cxGrid1DBTableView1.Controller.FocusedColumn 当前列
cxGrid1DBTableView1.Controller.FocusedColumnIndex 当前列号
cxGrid1DBTableView1.Controller.EditingItem 当前编辑中的单元框
cxGrid1DBTableView1.Controller.EditingController.Edit 当前的编辑框

在编辑状态下可以这样取当前单元格的值:
if cxGrid1DBTableView1.Controller.FocusedColumn.Editing then
ShowMessage(cxGrid1DBTableView1.Controller.EditingController.Edit.EditingValue)
else
cxGrid1DBTableView1.DataController.GetValue(cxGrid1DBTableView1.DataController.FocusedRecordIndex,
cxGrid1DBTableView1.Controller.FocusedItemIndex);

非编辑状态下可以这样取得单元格内的值:
OnCellClick事件代码: 
procedure   TForm1.cxGrid1DBTableView1CellClick( 
    Sender:   TcxCustomGridTableView; 
    ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; 
    AShift: TShiftState;   var   AHandled: Boolean); 
var 
    v : Variant; 
begin 
    v := ACellViewInfo.Value; 
end;

 

取列值
i := cxGrid1DBBandedTableView1.Controller.FocusedColumn.Index;
cxGrid1DBBandedTableView1.DataController.GetValue(cxGrid1DBBandedTableView1.Controller.SelectedRows[0].RecordIndex,i);
cxGrid1DBTableView1.DataController.Values[行,列]
取得焦点
cxGrid1DBTableView1.Columns[5].FocusWithSelection;
cxGrid1DBTableView1.Columns[4].Focused:=True;
得到当前点击的单元格的值
uses   Clipbrd;

OnCellClick事件代码:
procedure   TForm1.cxGrid1DBTableView1CellClick(
    Sender:   TcxCustomGridTableView;
    ACellViewInfo:   TcxGridTableDataCellViewInfo;   AButton:   TMouseButton;
    AShift:   TShiftState;   var   AHandled:   Boolean);
var
    v   :   Variant;
begin
    v   :=     ACellViewInfo.Value;//值
    Clipboard.AsText     :=     vartostr(v);//保存到clipboard
end;
cxGrid的DBTableView的名称为dgtv1

1. 返回选中的行数 gdtv1.DataController.GetSelectedCount;

2. 返回选中行的索引: gdtv1.DataController.GetSelectedRowIndex(0) , 表示第一个选中行的索引

3. 返回选中行的数据;

   var
   I, J:Integer;
begin
   for I:=0 to gdtv1.DataController.GetSelectedCount - 1 do begin
     J := gdtv1.DataController.GetSelectedRowIndex(I);
     ShowMessage(VarToStr(gdtv1.DataController.GetValue(J, 0))); //选择中行的第列的值
   end;
end;

4. 获取cxGrid排序规则

const
   OrderArray: array[soNone..soDescending] of string = ('None', 'ASC', 'DESC');
var
   I: integer;
   S, OrderStr: string;
begin
   for I := 0 to gdtv1.SortedItemCount - 1 do begin
     if S <> '' then
       S := S + ', ';
     OrderStr := OrderStr + gdtv1.SortedItems[I].DataBinding.DefaultCaption + ' ';
     OrderStr := OrderStr + OrderArray[TcxDataSortOrder(gdtv1.SortedItems[I].SortOrder)];
     S := S + OrderStr;
   end;
   ShowMessage('ORDER BY ' + S);

 

5.获取多选的值

  for   i   :=   0   to   cxgrid1.SelectedRows.Count-1   do
begin 
 cxgrid1.DataSource.DataSet.GotoBookmark(Pointer(cxgrid1.SelectedRows.Items[i])); //定位选中的字段

end;

 

6.//选择行的第1列的值

 for I:=0 to cxGrid1DBTableView1.DataController.GetSelectedCount - 1 do
 begin
   J := cxGrid1DBTableView1.DataController.GetSelectedRowIndex(I);
   ShowMessage(VarToStr(cxGrid1DBTableView1.DataController.GetValue(J, 0)));  

end;

 

7.获取所选行的值

  with cxGrid1DBTableView1.Controller do
  begin

   for i:=0 to SelectedRowCount-1   do
   begin
    SelectedRows[i].Focused:=True;
    ShowMessage(ADOQuery1.fieldbyname('mc').AsString);
   end;

end;

来源:http://blog.csdn.net/yeeonefx/article/details/46661735

转载于:https://www.cnblogs.com/railgunman/p/7453904.html

SAP CO实战:如何用KKA2/CJ88结果分析码搞定项目收入成本匹配(附真实案例) 本文深入解析了SAP CO模块中结果分析码KKA2/CJ88的核心应用,通过真实案例详细阐述了如何在成本波动剧烈的销售型项目中,运用结果分析实现收入与成本的精准匹配。文章重点拆解了不同结果分析方法的适用场景与财务影响,并提供了从配置、操作到问题排查的完整实战指南,帮助财务顾问提升项目财务管理能力。 阅读详情

相关推荐

把 Client 当成 ABAP 系统的多租户底座:从 sy-mandt 到 CDS_CLIENT 的隔离机制与工程实践

本文深入解析SAP ABAP系统中Client概念的本质与应用。Client不仅是数据表的MANDT字段,更是会话级别的隔离边界,贯穿用户登录、授权和数据访问控制全过程。文章从ABAP SQL的隐式Client处理机制出发,详细介绍了USING CLIENT、USING ALL CLIENTS等安全跨客户端访问方式,并对比了传统CLIENT SPECIFIED的风险。同时阐述了ABAP CDS中@ClientHandling注解的类型与算法选择,包括#AUTOMATED自动拼接和#SESSION_VARIA

2007 年 ~ 2025 年,深耕 SAP 技术 18 年 148

cxGrid动态附加CheckBox选择、求和、操作过滤及定位记录.rar

cxGrid动态附加非绑定(无字段关联)的CheckBox,以提供用户选择,并对操作者的选择进求和输出;代码中牵涉到用语句对cxGrid过滤、过滤后的记录关联(定位)数据集数据。如有问题,欢迎到“中国软件研发联盟”QQ群:122058606 交流。

delphi_dev_cxgrid按钮可视态

delphi_dev_cxgrid按钮可视态 delphi_dev_cxgrid按钮可视态

cxGrid显示号的两种方式和两种代码

//============================================================================== // 显示cxGrid号 //============================================================================== procedure TFormM

wozengcong的专栏 4778

cxGrid让指定的某自动呈选选中的状态

cxView.ViewData.Rows[cxView.DataController.DataSource.DataSet.RecNo-1].Selected:=True;//将当前的选中的状态 载于:https://www.cnblogs.com/yooplmqj/p/9050112.html

weixin_34315665的博客 1066

cxGrid指定的选中状态

cxGrid让指定的某自动呈选选中的状态: cxView.ViewData.Rows[cxView.DataController.DataSource.DataSet.RecNo-1].Selected := True;//将当前的选中的状态 其它的用法: 1.让指定的获得焦点:  cxGrid1DBTableView1.ViewData.Records[i].Select

chinmusam的专栏 5001

Cxgrid选中,排序规则,当前正在编辑的单元格内的

Cxgrid选中,排序规则,当前正在编辑的单元格内的 Cxgrid选中,排序规则,当前正在编辑的单元格内的 2011-03-22 14:44 cxGrid1DBTableView1.Controller.FocusedRowIndex 当前cxGrid1DBTableView1.Controller.FocusedRow 当前 cxGrid1DBTableVie

shandiantianying的专栏 1094

delphi笔记—cxgrid的相关问题

1、将cxgrid与tcystylerepository这俩个控件结合起来,可以改变所选择的颜色,cxgrid中的tableview属性中的optionselection中的cellselect设置为false,在onfocuserecordchanged事件中,利用一句代码(Sender.Styles.Selection:=cxstyl2)即可实现改变所选的颜色; 2、cxgrid中的ta

hello_myhome的专栏 1018

delphi CXGRID用法定位选中等等)

CXGRID用法定位选中等等) DelphiCxgrid选中,排序规则,当前正在编辑的单元格内的 cxGrid1DBTableView1.Controller.FocusedRowIndex当前cxGrid1DBTableView1.Controller.FocusedRow当前 cxGrid1DBTableView1.Cont...

weixin_30834783的博客 1904

CXGRID用法(,定位选中等等)

cxgrid指定单元格的内容,总是用到,总是忘记,记在这里就不怕忘掉了 cxGridViewDataController.GetDisplayText (cxGridView.DataController.FocusedRecordIndex, cxGridView.GetColumnByFieldName('名').Index); Delphi Cxgrid选中,排序规则,当...

qq_18932003的博客 1166

CXGRID用法定位选中等等)

Delphi Cxgrid选中,排序规则,当前正在编辑的单元格内的 cxGrid1DBTableView1.Controller.FocusedRowIndex 当前cxGrid1DBTableView1.Controller.FocusedRow 当前cxGrid1DBTableView1.Controller.FocusedColumn 当前cxGrid1DB...

254

GRID用法定位选中等等)

Delphi Cxgrid选中,排序规则,当前正在编辑的单元格内的 cxGrid1DBTableView1.Controller.FocusedRowIndex 当前cxGrid1DBTableView1.Controller.FocusedRow 当前cxGrid1DBTableView1.Controller.FocusedColumn 当前cxGrid1DB...

880

xtragrid 某个 查找_CXGRID用法定位选中等等)

cxGrid1DBTableView1.Controller.FocusedRowIndex 当前cxGrid1DBTableView1.Controller.FocusedRow 当前cxGrid1DBTableView1.Controller.FocusedColumn 当前cxGrid1DBTableView1.Controller.FocusedColumnIndex 当前号cx...

weixin_35627928的博客 342

cxgrid

cxgrid A. i:=cxGrid1DBBandedTableView1.Controller.FocusedColumn.Index; cxGrid1DBBandedTableView1.DataController.GetValue(cxGrid1DBBandedTableView1.Controller.SelectedRows[0].RecordIn...

qq_18932003的博客 812

Cxgrid选中,排序规则

Cxgrid选中,排序规则

hffyyff的博客 988

cxGrid动态创建+为某内嵌下拉框

一、动态创建 方法1: var i: Integer; Column: TcxGridDBColumn; cxView: TcxGridDBTableView; begin cxView := Self.Levels[0].GridView as TcxGridDBTableView; if cxView.DataController.DataSource &lt...

wszysystem的专栏 3527

Delphi中CxGrid控件使用总结

(注版本为DevExpr_v46) 1.     CxGrid汇总功能 ① OptionsView-Footer设置为True,显示页脚   ② CxGrid的Summary选项卡定义要汇总的和字段名及汇总方式,Footer选项卡定义单个汇总,Default For Groups定义按组汇总。OptionsView-GroupFooters设置为gfAlwaysVisible则显示按组

fly的专栏 1万+

【2024年新版】A股上市企业信息不对称指数ASY数据与stata代码2023-1991

A股上市企业信息不对称指数ASY数据与stata代码2023-1991年更新日志:此次数据更新扩充到了1991-2023年,增量不加价文献:金融科技与企业全要素生产率...—“赋能”和信贷配给的视角_宋敏政治关联和融资约束_信息效应与资源效应_于蔚方法:利用上述文献2人的方法构建,构建流动性比率指标LR、]利用上述文献2人的方法构建,构建流动性比率指标LR、]再对LR、ILL、GAM进主成分分析,构建信息不对称(ASY),信息不对称程度越高,股票流动性越低,LR、ILL、 GAM 越大其中lr,ill公式如下:数据样本:数据量:附件包含:原始数据+do代码+处理结果+文献

上一篇: 如何提高cxgrid的刷新速度
下一篇: cxgrid中,如何根据列名或字段名取得footer值
aowo7144
博客等级 码龄9年 5粉丝 0原创
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值