Source position: pscanner.pp line 1039
public property TPascalScanner.OnWarnDirective : TPScannerWarnEvent read FOnWarnDirective write FOnWarnDirective;