On Mon, 23 Nov 2009, Florian Klaempfl wrote:
Denis Golovan schrieb:
Hi all
I've got a non-obvious class hierarchy with interfaces involved.
The problem is that, I thought "property ... implements ...;"
construction fully substitute for implementing interface methods in
class itself, but now it's just not true.
I get different results in case implements is used and when it isn't.
If I comment implements implementation, my results are:
TClassBase.Print 3
TClassBase.Print 3
TClassBase.Print 3
If I use implements, my results are:
TClassBase.Print 3
TClassBase.Print 3
TClassBase.Print 30
See my example below.
I wonder if it is by design?
I have similar bug posted on bug tracker
under http://bugs.freepascal.org/view.php?id=14842
implements still might be buggy.
Not 'might', it definitely is buggy :(
Michael.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
