Source position: pscanner.pp line 851
protected procedure TPascalScanner.HandleMessageDirective(
Param: string
); virtual;