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