Source position: pastree.pp line 1279
public property TPasProcedure.MessageName : TPastreeString read FMessageName write FMessageName;