tdyx
45783
|
2013/4/14 10:53:19 |
[Fatal Error] zhangshelly_DBGridEH.pas(13): File not found: 'EhLib.Inc' 找不到这个是什么? |
cyf__delphi
42993
|
2012/11/10 12:29:51 |
zhangshelly
你的联系方式?
我的邮件是:271036043@QQ.com QQ:271036043
关于dbgrideh 的分组显示,郁闷了 |
cyf__delphi
42992
|
2012/11/10 12:27:09 |
我下载了PAS文件,也更新了,但还是有BUG,鼠标滚动时,表格线还是显示出来. 如果可以, zhangshelly
你能加我的QQ,或是告诉你的QQ吗? 我的QQ:271036043 |
zhangshelly
41990
|
2011/11/29 10:34:26 |
VCLJPG这是个包,查找一下vcljpgxx.bpl有没有 |
pidunzai
41975
|
2011/11/21 11:44:42 |
我安装的时候提示 VCLJPG这个单元不存在,我的QQ号是345598083,交流一下 |
hhi179
41753
|
2011/8/5 10:27:42 |
合并的效果可以,但鼠票点某行的时候会一闪一闪的,然后按向上键的时候,那些网格也会出现。 |
yangzh
41519
|
2011/5/3 18:58:43 |
DBGridEh 5.248 修改版 不支待DELPHI XE |
zhangshelly
41320
|
2011/1/27 13:33:15 |
春节期间我会把这些问题理理,感谢大家把问题反馈给我 |
jacke0106
41310
|
2011/1/19 15:51:19 |
我的QQ28766297,交流一下 |
jacke0106
41309
|
2011/1/19 15:47:46 |
zhangshelly ,dbgrideh 以代码动态更改编辑状态 DBGridEhSale.Options:=DBGridEhSale.Options+[dgEditing]; DBGridEhSale.Columns[4].ReadOnly:=false; 会出现更改成可编辑时,可编辑的单元格数值会变成第一行记录的值(只是显示的问题,上下移动记录指针就不会),这个bug不知道怎么解决 |
8111098
41289
|
2011/1/8 21:35:50 |
想问一下 zhangshelly 老大 ,盒子的 ftp 如何上? |
ultrawolf
41253
|
2010/12/23 17:25:26 |
dbgrideh,不需要 Tmemtableeh也能实现排序的,只要你在单元里 引用相应的 eHlibAdo,或EhLibBde或EhlibCds等就可以了,再就是设定2个属性 1. grideh1的optioneh里 autoSortMarker设为True 2. 要排序的Column的Titlebutton设为True |
kushu
41221
|
2010/12/2 15:14:13 |
hint不能用了 郁闷 |
guofu
41151
|
2010/11/7 21:38:07 |
想问一下,DBGirdEh5排序和过滤功能要使用TMemTableEh才能实现,有没有像cxGrid那样的方法,可以直接对ADOQuery进行排序和过滤。
其实DBGridEh挺好用的,但是要实现排序功能要多用一个TMemTableEh控件,感觉不太爽,毕竟是第三方的东西,我的主张是在项目中尽量少对第三方控件的依赖,免得以后维护麻烦。 |
hezhy2002
41140
|
2010/11/1 10:13:07 |
我在杭州,怎么联系你?你加我QQ:112274572 |
hawk117
41121
|
2010/10/21 17:29:33 |
编译PAS时报“File not found:'ehlib.inc'”怎么解决? |
alphaservice
41033
|
2010/10/2 13:52:01 |
zbj2001 41011 2010-9-26 14:48:16 只有DELPHI有这么多控件。真是好。只是在IE中显示用不上了。所以。。。 所以就用CBX平台嘛,用DELPHI的界面,所有的DELPHI控件,做出的在WEB下运行程序 |
wwzjx123
41016
|
2010/9/27 9:28:58 |
非常感谢ZhangShelly,帮我们解决了DBGRIDEH分组合并 |
zhangshelly
41013
|
2010/9/26 15:24:42 |
修正后的dbgrideh已经发到ftp,文件名 zhangshelly_dbgrideh.pas |
zhangshelly
41012
|
2010/9/26 15:11:07 |
修改wwzjx123反映的问题代码如下,在DefaultDrawColumnDataCell中申明一个变量Fcolstr:string;然后修改相应的代码如下,不好意思,没经过严格测试就发上来了
if Column.HideDuplicates and not FColCellParamsEh.BlankCell then begin if (AreaCell.Y < InstantReadRecordCount) and (Column.FCheckedDuplicates[AreaCell.Y-TopRow+TopDataOffset+1] = False) then if CheckColumnDuplicateValues(Column, FColCellParamsEh.FText, False) then begin // add by zxl 判断前列是否向下行合并 ClearSubLine:=True; if FSucMergeField and ClearSubLine then begin Fmi:=FmergeFlist.IndexOfObject(Column); for i:=0 to Fmi-1 do begin FMergeColumn:=TColumnEh(FmergeFlist.Objects[Fmi-1]) ; FColStr:=FMergeColumn.DisplayText; ClearSubLine:=ClearSubLine and CheckColumnDuplicateValues(FMergeColumn,FColStr,False); if not ClearSubLine then break; end; end; end;
if CheckColumnDuplicateValues(Column, FColCellParamsEh.FText, True) then begin // add by zxl 判断前列是否向上行合并 FCanUpMerge:=True; if FSucMergeField and FCanUpMerge then begin Fmi:=FmergeFlist.IndexOfObject(Column); for i:=0 to Fmi-1 do begin FMergeColumn:=TColumnEh(FmergeFlist.Objects[Fmi-1]) ; FColStr:=FMergeColumn.DisplayText; FCanUpMerge:=FCanUpMerge and CheckColumnDuplicateValues(FMergeColumn,FColStr,True); if not FCanUpMerge then break; end; end; if FCanUpMerge then begin //以上 add by zxl FColCellParamsEh.FText := ''; FColCellParamsEh.FImageIndex := -1; //if Column.FCheckedDuplicates[AreaCell.Y-TopRow+TopDataOffset] = False then // begin ClearOnLine := True; Column.FCheckedDuplicates[AreaCell.Y-TopRow+TopDataOffset] := True; // end; end; end; end; |