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