Delph 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;

Delph cxGrid操作相关推荐

VirtualBox – CMSTORM键盘上无背光
本文向您展示如何在CMSTORM键盘上启用背光功能(屏幕锁定键). 环境 VirtualBox 5.1.14 Ubuntu 16 1.解决方案–快速要快速修复,请在终端中运行以下命令,然后再次按&q ...
关于大型网站技术演进的思考
关于大型网站技术演进的思考(一)--存储的瓶颈(1) 前不久公司请来了位互联网界的技术大牛跟我们做了一次大型网站架构的培训,两天12个小时信息量非常大,知识的广度和难度也非常大,培训完后我很难完整理出 ...
cxGrid 使用指南 1
1:cxgrid是应该数据关联的控件,类似dbgrid. 2:一般用来查阅表信息,如果要修改的话,直接在上面编辑或添加非常不方便通常要放几个EDit来对选中的记录进行编辑或添加记录.因为表一般都有主 ...
cxGRID能否对模板进行保存
cxGRID能否对模板进行保存 Delphi / Windows SDK/API http://www.delphi2007.net/DelphiDB/html/delphi_200612141828 ...
cxGrid, 和AfterScroll
有一DataSet邦定DBGrid, 在保存....等操作后, AfterScroll表现正常后将这个DataSet邦定到cxGrid上面, 发现在执行保存和Field.Readonly之后,Aft ...
cxGrid功能_用于备查【转】
好久没有写笔记了,现在有点时间,来篇. happycyp 2007-7-19 cxGrid功能强大,适合做企业级的复杂查询.非常方便. 但是对其用法介绍的并不多,在此总结他人的使用经验和自己的一点小 ...
进制选择器c语言算法,c語言编程技巧第1章走进Delph.doc
c語言编程技巧第1章走进Delph 第1章走进Delphi 本章回答了谁是本书的读者.本书适用于中.高级的Delphi程序员,以及从Visual Basic或C++语言迁移到Delphi的专业程序员 ...
Delphi文件读写操作常用的方法
在进行win32开发中对文件的读写是最常用的操作之一,这编文章西西小编和大家一起来学习一下在Delphi中如何读写文件的方法. Delphi 支持三种文件类型: 文本文件.记录文件.无类型文件. 文 ...
使用JPA进行Update操作 @Query注解的用法，JPL
使用jpa进行update操作有两种,第一种就是先查询,set,再进行save更新.这种做法过于繁杂,我只是要进行一个更新操作却变成了三步,所以我推荐使用第二种: @Modifying @Query( ...

Delph cxGrid操作

Delph cxGrid操作相关推荐

最新文章

热门文章