Re: [fpc-pascal] virtual method and generics

Am 19.11.2013 10:21 schrieb "Xiangrong Fang" : > > Hi, > > In my TTree class: https://github.com/xrfang/fpcollection/blob/master/src/units/tree.pas > > I have the following method: > > function TTree.Load(s: TStream): Integer; > var > lv, c: QWord; > node: TTree; > buf: Pointer; > begin > C

[fpc-pascal] virtual method and generics

Hi, In my TTree class: https://github.com/xrfang/fpcollection/blob/master/src/units/tree.pas I have the following method: function TTree.Load(s: TStream): Integer; var lv, c: QWord; node: TTree; buf: Pointer; begin Clear; if not ReadNodeData(s, lv, buf, c) then Exit(0); DoRestore(buf