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