delphi泛型实现的接口

delphi泛型实现的接口

?

1 2 3 4 5 6 7 8 9

type   TRest<T: record> = record     resource: string;     where: string;     function select: T;     procedure insert(const aRecord: T);     procedure update(const aRecord: T);     procedure delete(const aRecord: T);   end;