2013/10/7 Sven Barth <pascaldra...@googlemail.com> > On 07.10.2013 20:38, silvioprog wrote: > >> 2013/10/7 Sven Barth <pascaldra...@googlemail.com >> <mailto:pascaldragon@**googlemail.com <pascaldra...@googlemail.com>>> >> >> On 07.10.2013 19:29, silvioprog wrote: >> >> Hello, >> >> I was surfing the internet and came across this structure Delphi: >> >> >> TJSONPair= class sealed(TJSONAncestor) >> >> >> So, what is this? >> >> >> Simple: You are not allowed to create child classes of sealed >> classes (the compiler enforces this). FPC supports this since 2.4.2. >> >> Regards, >> Sven >> >> >> Perfect! >> >> It tested it: >> >> TBaseClass = class >> end; >> >> TOtherClass = class sealed(TBaseClass) >> end; >> >> TFooClass = class(TOtherClass) >> end; >> >> and: >> >> unit1.pas(24,32) Error: Cannot create a descendant of the sealed class >> "TOtherClass" >> >> It is wonderful, thank you very much Sven! :) >> > > Well, the opinion whether this feature is wonderful or not differs among > FPC/Delphi users :P > > Regards, > Sven >
:D -- Silvio Clécio My public projects - github.com/silvioprog
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal