> Both RegisterClass procedures I pointed out are methods of the framework, eg:
Yes, I know. I implement it this way now: procedure RegisterClass(AClass: TghModelClass); procedure RegisterClass(AClass: TghModelClass; const AName: String); ... procedure RegisterClass(AClass: TghModelClass); var ClassName: String; begin ClassName := AClass.ClassName; Delete(ClassName,1,1); RegisterClass(AClass,ClassName); end; procedure RegisterClass(AClass: TghModelClass; const AName: String); begin ClassMap[AClass] := AName; end; ... -- View this message in context: http://free-pascal-general.1045716.n5.nabble.com/How-to-make-class-constructor-body-calls-descendant-s-overriden-method-property-tp5711994p5712009.html Sent from the Free Pascal - General mailing list archive at Nabble.com. _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
