Ehlib这个表格组件真的不错,比delphi自带的DBgrid强太多了。下面说下里面的三个具体功能!
1、自动排序(无代码)
不用写代码,只要选择相应的属性就可以了。
A、将该组件的[OptionsEn]中的 dgAutoSortMarking 属性设置为 True
B、将要排序的字段的属性列表的 [Title]的 TitleButton 属性设置为 True
C、uses 子句中加上 EhlibBDE单元
2、本地过滤
设置属性
STFilter.Local := True;
STFilter.Visible := True;
在窗口初始化
initialization
DBGridEhDefaultStyle.FilterEditCloseUpApplyFilter := True;
uses单元
uses EhLibMTE;
3、树型展示
依次需要TADOConnection、TADOQuery、TDataSetDriverEh、TMemTableEh、TDataSource
然后设置TMemTableEh的属性Fielddefs
最后代码
qry1.Open;
mtblh1.TreeList.Active := True;
mtblh1.TreeList.KeyFieldName := 'actid';
mtblh1.TreeList.RefParentFieldName := 'tid';
mtblh1.Open;