{ Parsed from Foundation.framework NSScriptCoercionHandler.h } {$ifdef TYPES} {$ifndef NSSCRIPTCOERCIONHANDLER_PAS_T} {$define NSSCRIPTCOERCIONHANDLER_PAS_T} {$endif} {$endif} {$ifdef RECORDS} {$ifndef NSSCRIPTCOERCIONHANDLER_PAS_R} {$define NSSCRIPTCOERCIONHANDLER_PAS_R} {$endif} {$endif} {$ifdef FUNCTIONS} {$ifndef NSSCRIPTCOERCIONHANDLER_PAS_F} {$define NSSCRIPTCOERCIONHANDLER_PAS_F} {$endif} {$endif} {$ifdef EXTERNAL_SYMBOLS} {$ifndef NSSCRIPTCOERCIONHANDLER_PAS_S} {$define NSSCRIPTCOERCIONHANDLER_PAS_S} {$endif} {$endif} {$ifdef FORWARD} NSScriptCoercionHandler = objcclass; NSScriptCoercionHandlerPointer = ^NSScriptCoercionHandler; NSScriptCoercionHandlerPtr = NSScriptCoercionHandlerPointer; {$endif} {$ifdef CLASSES} {$ifndef NSSCRIPTCOERCIONHANDLER_PAS_C} {$define NSSCRIPTCOERCIONHANDLER_PAS_C} { NSScriptCoercionHandler } NSScriptCoercionHandler = objcclass external (NSObject) private _coercers: id; public class function sharedCoercionHandler: NSScriptCoercionHandler; message 'sharedCoercionHandler'; function coerceValue_toClass(value: id; toClass: Pobjc_class): id; message 'coerceValue:toClass:'; procedure registerCoercer_selector_toConvertFromClass_toClass(coercer: id; selector: SEL; fromClass: Pobjc_class; toClass: Pobjc_class); message 'registerCoercer:selector:toConvertFromClass:toClass:'; end; {$endif} {$endif}