Source position: pastree.pp line 1260
public function TPasClassProcedure.ElementTypeName: string; override;