Re: [fpc-pascal] dOPF: "Sleek, intuitive, and fast object persistence..." Business objects are descendants of TObject.

2014-08-26 Thread Osvaldo Filho
One more info: dOPF works with the stable versions of FPC/Lazarus: 2.6.4/1.2.4 2014-08-26 9:33 GMT-03:00 Sven Barth : > Am 26.08.2014 12:40 schrieb "Osvaldo Filho" : > > > The same author's Brookframework already in production on their systems. > > And the same author is also active here on the

Re: [fpc-pascal] dOPF: "Sleek, intuitive, and fast object persistence..." Business objects are descendants of TObject.

2014-08-26 Thread Sven Barth
Am 26.08.2014 12:40 schrieb "Osvaldo Filho" : > The same author's Brookframework already in production on their systems. And the same author is also active here on the mailing list and he's also "advertising" his projects here already ;) (which reminds me that I still need to test the Brook framew

[fpc-pascal] dOPF: "Sleek, intuitive, and fast object persistence..." Business objects are descendants of TObject.

2014-08-26 Thread Osvaldo Filho
https://github.com/silvioprog/dopf "Sleek, intuitive, and fast object persistence for faster and easier database development." Business objects are descendants of TObject. No need to change the database previously in use. Support fields with reserved words of FreePascal on the tables of the dat

Re: [fpc-pascal] Operator overloading and generic class

2014-08-26 Thread Xiangrong Fang
Sorry, I asked similar question long time ago, I found it in my gmail. Please ignore this question. However, I hope FPC will add this feature in future release anyway. 2014-08-26 16:17 GMT+08:00 Xiangrong Fang : > Hi All, > > While I try to compile this code: > > program demo; > {$mode objfpc}

[fpc-pascal] Operator overloading and generic class

2014-08-26 Thread Xiangrong Fang
Hi All, While I try to compile this code: program demo; {$mode objfpc}{$H+} uses tree; type TIntTree = class(specialize TTree) end; TITTree = class(specialize TTree) end; operator <(it1, it2: TIntTree): Boolean; begin Result := it1.Data < it2.Data; end; var itt: TITTree; begin end.