Source position: pastree.pp line 1142
public property TPasProcedure.MessageName : string read FMessageName write FMessageName;