DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: monica9612
今日帖子: 0
在线用户: 7
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 janker (janker) ★☆☆☆☆ -
盒子活跃会员
2019/5/18 19:25:20
标题:
关于TMS Aurelius的一个基础问题 浏览:678
加入我的收藏
楼主: 这两天看TMS Aurelius,有个基础问题,如果TMS Aurelius用在服务端,能不能写个简单的类似function GetData(AEntry:TClass):TObjectList;的函数,这里不考虑过滤条件,只是SelectAll记录。我怎么也写不出来,因为TMS Aurelius都是要求具体类的,这样比如如果有上百个表,那不是要写重复的上百个同样的函数,只是AEntry:TClass不同?

举例代码如下:
function GetData(aObj: TClass): TObjectList<TObject>;
var
  aCri: TCriteria;
begin
  aCri := FObjManager.CreateCriteria(aObj);
  Result := aCri.List<TObject>;   //这个不行
end;

类似这种通用的方法怎么实现?
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行54.6875毫秒 RSS