Source position: pscanner.pp line 757
type TPScannerLinkLibEvent = procedure(
Sender: TObject;
const aLibName: TPasScannerString;
const aLibAlias: TPasScannerString;
const aLibOptions: TPasScannerString;
var Handled: Boolean
) of object;