CxGrid使用方法

CxGrid使用方法

ID:47427094

大小:285.50 KB

页数:50页

时间:2020-01-10

CxGrid使用方法_第页
预览图正在加载中,预计需要20秒,请耐心等待
资源描述:

《CxGrid使用方法》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、cxGrid的使用方法cxGrid功能强大,适合做企业级的复杂查询。非常方便。但是对其用法介绍的并不多,在此总结他人的使用经验和自己的一点小经验,供大家参考。(1)动态设置显示格式procedureSetDisplayFormat(ACtrlData:TClientDataSet; TbView:TcxGridDBTableView);var i:integer;begin ifACtrlData.RecordCount<=0thenExit; try  TbView.ClearItems;  ACtrlData.First;  fori:=0toACtrlData.RecordCount

2、-1do  begin   ifACtrlData.FieldByName('SQBF_DisplayInGrid').AsString='1'then//在表格中显示   withTbView.CreateColumndo   begin    DataBinding.FieldName:=ACtrlData.FieldByName('SQBF_FieldName').AsString;    Caption:=ACtrlData.FieldByName('SQBF_Caption').AsString;//字段中文标题    Hint:=ACtrlData.FieldByName('S

3、QBF_Hint').AsString;    Width:=ACtrlData.FieldByName('SQBF_Width').AsInteger;    HeaderAlignmentHorz:=taCenter;   end;   ACtrlData.Next;  end; except  onE:Exceptiondo   SaveLog('设置显示格式时出错:'+E.Message); end;end;(2)显示行号procedureTFmQueryBase.cxDBViewMasterCustomDrawIndicatorCell( Sender:TcxGridTableV

4、iew;ACanvas:TcxCanvas; AViewInfo:TcxCustomGridIndicatorItemViewInfo;varADone:Boolean);var FValue:string; FBounds:TRect;begin FBounds:=AViewInfo.Bounds; if(AViewInfoisTcxGridIndicatorRowItemViewInfo)then begin  ACanvas.FillRect(FBounds);  ACanvas.DrawComplexFrame(FBounds,clBlack,clBlack,[bBottom,bL

5、eft,bRight],1);  FValue:=IntToStr(TcxGridIndicatorRowItemViewInfo(AViewInfo).GridRecord.Index+1);  InflateRect(FBounds,-3,-2);//Platformspecific.MaynotworkonLinux.  ACanvas.Font.Color:=clBlack;  ACanvas.Brush.Style:=bsClear;  ACanvas.DrawText(FValue,FBounds,cxAlignCenterorcxAlignTop);  ADone:=True

6、; end;end;(3)设置显示格式,我的项目要求先动态添加字段,这时不知道字段类型,所以设置DisplayFormat不方便,我还没有找到好方法。所以采用打开数据集后再设置:procedureTFmQueryBase.cdsMasterAfterOpen(DataSet:TDataSet);var i:Integer;begin fori:=0tocxDBViewMaster.DataController.DataSet.FieldCount-1do begin  ifcxDBViewMaster.DataController.DataSet.Fields[i]isTNumericFi

7、eldthen  begin   ifPos('AMOUNT',UpperCase(cxDBViewMaster.DataController.DataSet.Fields[i].FieldName))>0then   begin    TNumericField(cxDBViewMaster.DataController.DataSet.Fields[i]).DisplayFormat:='#,##0.000';   

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。