I have a many classes, one inherits from another one, in an ancestor method, I want to test whether the calling class is a childless class.

e.g.
class function TAncestor.GetCaption : String; //virtual
begin
    if HasChild then
      result := 'something'
  else
    result := 'something else';

end;


where HasChild is a boolean class function that tells me whether the current calling class has children defined or now.

Is that possible?

Dennis
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to