摘要: 49指定Filter Builder打开/保存过滤文件的默认路径解决:uses ..., cxFilterControlDialog; procedure TForm.GridView1FilterControlDialogShow( Sender: TObject); begin TfmFilterControlDialog(Sender).OpenDialog.InitialDir := 'D:/' end;****************************************************************************50在主从Tab 阅读全文
posted @ 2013-10-15 20:12 无悔的勇气 阅读(371) 评论(0) 推荐(0) 编辑
摘要: Function GBCht2Chs(GBStr: String): AnsiString; {GBK繁体转简体} Var len:integer; pGBCHTChar: PChar; pGBCHSChar: PChar; Begin pGBCHTChar := PChar(GBStr); Len := SizeOf(pGBCHTChar); GetMem(pGBCHSChar, Len + 1); ZeroMemory(pGBCHSChar, Len + 1); //GB CHS -> GB CHT LCMapString($804, LCMAP_SIMPLIFIED_CH... 阅读全文
posted @ 2013-10-15 20:08 无悔的勇气 阅读(373) 评论(0) 推荐(0) 编辑
摘要: 32根据单元的值设置样式 解决:procedure .StylesGetContentStyle( Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem; out AStyle: TcxStyle); begin if ARecord.Values[AItem.Index] = aSomeValue then AStyle := ; end; procedure .StylesGetContentStyle( Sender: TcxCustomGridT... 阅读全文
posted @ 2013-10-15 20:07 无悔的勇气 阅读(353) 评论(0) 推荐(0) 编辑
摘要: //工程引用此单元就能防止同时出现多个实例unit MultInst;interfaceuses Windows ,Messages, SysUtils, Classes, Forms;implementationconst STR_UNIQUE = '{2BE6D96E-827F-4BF9-B33E-8740412CDE96}'; MI_ACTIVEAPP = 1; {激活应用程序} MI_GETHANDLE = 2; {取得句柄}var iMessageID : Integer; OldWProc : TFNWndProc; MutHandle : THandle; BSM 阅读全文
posted @ 2013-10-15 20:05 无悔的勇气 阅读(582) 评论(0) 推荐(0) 编辑
摘要: 17. 怎样设计多表头的cxGrid? 解决:cxGrid可以解决如下的表头: --------------------------------- | 说明1 | 说明2 | --------------------------------- | 字段1 | 字段2 | 字段3 | 字段4 | | 字段5 | 字段6 | | 字段7 | 字段8 | 字段9 | 实现这个很简单,你可以直接在上面拖动字段名,拖动时会显示箭头的,放入你想显示的位置就OK了。或者在鼠标右击cxGrid1DBBandedTableView1菜单里的Edit Layout里也可以拖放。但是cxGrid不能实现如下的多表头 阅读全文
posted @ 2013-10-15 20:03 无悔的勇气 阅读(729) 评论(0) 推荐(0) 编辑
摘要: const AA : arrary[0..4] of byte =(0,1,2,3,4)var BB : arrary[0..4] of byte;begin BB := AA ; {这样是错误的} Move(BB,AA,sizeof(BB)); {正确的}end; 阅读全文
posted @ 2013-10-15 20:00 无悔的勇气 阅读(684) 评论(0) 推荐(0) 编辑
摘要: 这些都不是原创,只是平时收集到资料然后整理的,有些可能百度一下到处都是而且还大同小异也有些不是很好找,现在贴出来希望给那些用到cxGrid的人会有所帮助1. 去掉cxGrid中台头的Box 解决:在tableview1的ptionsview的groupbybox=false;***************************************************************************** 2.统计功能 解决:(1) tableview tableview1的optionsviewfooter=ture 然后在cxGRid1的customize..中的su 阅读全文
posted @ 2013-10-15 19:58 无悔的勇气 阅读(320) 评论(0) 推荐(0) 编辑