[fpc-pascal] Extend multiple classes with same code

[Jorge Aldo G. de F. Junior]

So basically they are in the same branch (Well you could argue that
every object inherits from TObject, but i cant imagine someone
creating a helper class for TObject).

> Please not that the extended classes (in this case T_B1 and T_B2) need to
> inherited from T_A, otherwise the compiler will complain.
>
> Regards,
> Sven
>
>
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal