Source position: pscanner.pp line 958
public property TPascalScanner.OnDirective : TPScannerDirectiveEvent read FOnDirective write FOnDirective;