有没有人知道一个与Generics和RTTI一起工作的TDataset后代,这样我就可以编写这样的代码,并在GUI中使用数据感知组件? :
... ds:TDataset<TPerson>; ... procedure DoStuff; begin ds:=TDataset<TPerson>.create; ds.add(TPerson.Create('A.','Hitler',77)); ds.add(TPerson.Create('O.','Bin Laden',88)); end;
这应该是可能的. fielddef可以通过RTTI创建,因为已知数据的确切类型.值也可以来回自动编组,因此您可以查看和编辑类或记录中的数据.
我讨厌编写大量无用的编组代码,而已经通过RTTI获得所需的信息.
或许有人曾经写过某种TEnumerable< - > TDataset适配器?
这样的事情是存在的,还是我应该开始写一个?
…
我能找到的最接近的东西是来自Mastering Delphi 7的Marco Cantu(优秀!)example,但代码本身并没有使用泛型,新的RTTI系统或属性等新语言功能,而且它没有使用Unicode delphi.自D7以来,TDataset也发生了变化.
解决方法
TMS Aurelius中包含的TAureliusDataSet非常接近.