delphi cxGrid应用笔记

本文整理自网络，侵删。

 
1.获得当前列号

  //移动列的位置后，返回结果也改变.

    cxGridDBTableView1.Controller.FocusedColumnIndex;

  cxGridDBTableView1.Controller.FocusedItemIndex;



2.获得当前行号

  //过滤、排序操作会改变返回的结果。
  cxGridDBTableView1.Controller.FocusedRowIndex;

  cxGridDBTableView1.Controller.FocusedRecordIndex;

  cxGridDBTableView1.DataController.FocusedRowIndex;

  //过滤、排序操作不影响返回的结果。
   cxGridDBTableView1.DataController.FocusedRecordIndex



3.获得当前活动单元格的值：

  cxGridDBTableView1.DataController.GetValue(
     cxGridDBTableView1.DataController.FocusedRecordIndex,

     cxGridDBTableView1.Controller.FocusedColumn.Index);



4.动态变更cxGrid列的GetPropertiesForEdit事件中AProperties的只读属性，列的SortOrder属性值必须为：soNone;

procedure TFormDesigner.cxGridDBTableView1Column1GetPropertiesForEdit
  (Sender: TcxCustomGridTableItem; ARecord: TcxCustomGridRecord;
  var AProperties: TcxCustomEditProperties);
begin
 //动态变更AProperties的只读属性，列的SortOrder属性值必须为：soNone;

 cxGridDBTableView1Column1.SortOrder := soNone;
  if (Sender.GridView AS TcxGridDBTableView).DataController.
      DataSource.DataSet.UpdateStatus = usInserted then
    AProperties.ReadOnly := False  //此列不能排序，否则此行触发异常.
  else
    AProperties.ReadOnly := True;  //此列不能排序，否则此行触发异常.
end;



5.Rad Studio 10.1 Berlin版本，DATASNAP接口方法不支持下面的形参格式:

function ParamTest(Const ParaOleVar: OleVariant): Integer;

去掉Const形参前缀后就可以支持，支持如下声明：

function ParamTest(ParaOleVar: OleVariant): Integer;
――――――――――――――――

原文链接：https://blog.csdn.net/QQ56430204/article/details/54693292
 

相关阅读 >>

Delphi+access错误"不正常地定义参数对象。提供了不一致或不完整的信息。"

检测系统信息的单元 computerinfo.pas

Delphi urldownloadtofile 实现文件下载

Delphi webbrowser全选\复制\粘贴

Delphi firedac 下的 sqlite [12] - 备忘录

Delphi 提升权限查找进程关闭进程单元

Delphi'控件的相对坐标与屏幕坐标转换

Delphi 获取与设置系统环境变量

Delphi获取系统字体列表

Delphi 字符串适宽处理

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi cxGrid应用笔记