TPascalScanner.RegisterDirectiveHandler

public procedure TPascalScanner.RegisterDirectiveHandler(

  const aDirective: string;

  const aHandler: TPScannerDirectiveEvent

); overload;

procedure TPascalScanner.RegisterDirectiveHandler(

  const aDirectives: TStringDynArray;

  const aHandler: TPScannerDirectiveEvent

); overload;