环境: delphi xe6, Datasnap , Ehlib
使用 Datasnap + TClientDataSet+ DBGridEh实现的三层框架, 用户想实现dbgrideh也能类似于Excel下拉筛选的功能。经过研究摸索,实现如下
需要五个控件: DBGridEh, TDataSource, TClientDataSet,TMemTableEh, TDataSetDriverEh
DBGridEh.DataSource > TDataSource
TDataSource.DataSet > TMemTableEh
TMemTableEh.DataDriver > TDataSetDriverEh
TDataSetDriverEh.ProviderDataSet > TClientDataSet
DBGridEh.SortLocal = True
DBGridEh.STFliter.Visible = True
DBGridEh.STFliter.Local= True
DBGridEh.STFliter.Location = stflUnderTitleFilterEh
界面单元添加引用 EhLibMTE
当TClientdataset 每次获取到数据之后,执行
MemTableEh.Active = False;
MemTableEh.Open;
效果如图