#S(HASH-TABLE EQL (FILENAME . "c:\programs\circle\subclassing.dll")(GUID . "{678B8B54-503A-11D3-92EE-0000F822352E}")(DESCRIPTION . "SubClassing for Circle")(VERSION . "1.0") (CLASSES . #S(HASH-TABLE EQUAL ("_GSubclass" (TYPE . "Dispinterface")(GUID . "{678B8B58-503A-11D3-92EE-0000F822352E}")(FUNCTIONS ((NAME . "QueryInterface") (RIID . #x60000000) (OFFSET . #x0) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("ppvObj" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "AddRef") (RIID . #x60000001) (OFFSET . #x4) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "Release") (RIID . #x60000002) (OFFSET . #x8) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfoCount") (RIID . #x60010000) (OFFSET . #xc) (RETURNS . "VT_VOID")(PARAMS ("pctinfo" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfo") (RIID . #x60010001) (OFFSET . #x10) (RETURNS . "VT_VOID")(PARAMS ("itinfo" "VT_UINT")("lcid" "VT_UI4")("pptinfo" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetIDsOfNames") (RIID . #x60010002) (OFFSET . #x14) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("rgszNames" "VT_PTR.VT_I1")("cNames" "VT_UINT")("lcid" "VT_UI4")("rgdispid" "VT_PTR.VT_I4")) (FLAGS ( IS-FUNCTION ))) ((NAME . "Invoke") (RIID . #x60010003) (OFFSET . #x18) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_I4")("riid" "VT_PTR.GUID")("lcid" "VT_UI4")("wFlags" "VT_UI2")("pdispparams" "VT_PTR.DISPPARAMS")("pvarResult" "VT_PTR.VT_VARIANT")("pexcepinfo" "VT_PTR.EXCEPINFO")("puArgErr" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "AttachMessage") (RIID . #x60030001) (OFFSET . #x1c) (RETURNS . "VT_VOID")(PARAMS ("iwp" "VT_PTR.VT_PTR._ISubclass")("hwnd" "VT_I4")("iMsg" "VT_I4")) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Start subclassing for a particular message.")) ((NAME . "DetachMessage") (RIID . #x60030002) (OFFSET . #x20) (RETURNS . "VT_VOID")(PARAMS ("iwp" "VT_PTR.VT_PTR._ISubclass")("hwnd" "VT_I4")("iMsg" "VT_I4")) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Stop subclassing for a particular message.")) ((NAME . "CurrentMessage") (RIID . #x68030000) (OFFSET . #x24) (RETURNS . "VT_I4")(PARAMS ) (FLAGS ( IS-GET ))(DESCRIPTION . "Returns the message currently being worked on. Only valid in the MsgResponse and WindowProc items of your implemented interface.")) ((NAME . "CallOldWindowProc") (RIID . #x60030003) (OFFSET . #x28) (RETURNS . "VT_I4")(PARAMS ("hwnd" "VT_I4")("iMsg" "VT_I4")("wParam" "VT_I4")("lParam" "VT_I4")) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Calls the window procedure for this handle which was installed before you added the subclass.")))) ("GSubclass" (TYPE . "Coclass")(GUID . "{678B8B59-503A-11D3-92EE-0000F822352E}")(ALIASES "_GSubclass") (FUNCTIONS )) ("_ISubclass" (TYPE . "Dispinterface")(GUID . "{678B8B55-503A-11D3-92EE-0000F822352E}")(FUNCTIONS ((NAME . "QueryInterface") (RIID . #x60000000) (OFFSET . #x0) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("ppvObj" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "AddRef") (RIID . #x60000001) (OFFSET . #x4) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "Release") (RIID . #x60000002) (OFFSET . #x8) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfoCount") (RIID . #x60010000) (OFFSET . #xc) (RETURNS . "VT_VOID")(PARAMS ("pctinfo" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfo") (RIID . #x60010001) (OFFSET . #x10) (RETURNS . "VT_VOID")(PARAMS ("itinfo" "VT_UINT")("lcid" "VT_UI4")("pptinfo" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetIDsOfNames") (RIID . #x60010002) (OFFSET . #x14) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("rgszNames" "VT_PTR.VT_I1")("cNames" "VT_UINT")("lcid" "VT_UI4")("rgdispid" "VT_PTR.VT_I4")) (FLAGS ( IS-FUNCTION ))) ((NAME . "Invoke") (RIID . #x60010003) (OFFSET . #x18) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_I4")("riid" "VT_PTR.GUID")("lcid" "VT_UI4")("wFlags" "VT_UI2")("pdispparams" "VT_PTR.DISPPARAMS")("pvarResult" "VT_PTR.VT_VARIANT")("pexcepinfo" "VT_PTR.EXCEPINFO")("puArgErr" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "MsgResponse") (RIID . #x40030000) (OFFSET . #x1c) (RETURNS . "VT_USERDEFINED.Enum.EMsgResponse")(PARAMS ) (FLAGS ( IS-GET ))(DESCRIPTION . "Get/set how you will respond to a message. Raised whenever a message is encountered. Call the CurrentMessage property to determine what message you are currently responding to.")) ((NAME . "MsgResponse") (RIID . #x40030000) (OFFSET . #x20) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_USERDEFINED.Enum.EMsgResponse")) (FLAGS ( IS-SET ))(DESCRIPTION . "Get/set how you will respond to a message. Raised whenever a message is encountered. Call the CurrentMessage property to determine what message you are currently responding to.")) ((NAME . "WindowProc") (RIID . #x60030000) (OFFSET . #x24) (RETURNS . "VT_I4")(PARAMS ("hwnd" "VT_I4")("iMsg" "VT_I4")("wParam" "VT_I4")("lParam" "VT_I4")) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Raised whenever a message you have subclassed is sent.")))) ("ISubclass" (TYPE . "Coclass")(GUID . "{678B8B56-503A-11D3-92EE-0000F822352E}")(ALIASES "_ISubclass") (FUNCTIONS )) ("_CTimer" (TYPE . "Dispinterface")(GUID . "{678B8B5A-503A-11D3-92EE-0000F822352E}")(FUNCTIONS ((NAME . "QueryInterface") (RIID . #x60000000) (OFFSET . #x0) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("ppvObj" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "AddRef") (RIID . #x60000001) (OFFSET . #x4) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "Release") (RIID . #x60000002) (OFFSET . #x8) (RETURNS . "VT_UI4")(PARAMS ) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfoCount") (RIID . #x60010000) (OFFSET . #xc) (RETURNS . "VT_VOID")(PARAMS ("pctinfo" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetTypeInfo") (RIID . #x60010001) (OFFSET . #x10) (RETURNS . "VT_VOID")(PARAMS ("itinfo" "VT_UINT")("lcid" "VT_UI4")("pptinfo" "VT_PTR.VT_VOID")) (FLAGS ( IS-FUNCTION ))) ((NAME . "GetIDsOfNames") (RIID . #x60010002) (OFFSET . #x14) (RETURNS . "VT_VOID")(PARAMS ("riid" "VT_PTR.GUID")("rgszNames" "VT_PTR.VT_I1")("cNames" "VT_UINT")("lcid" "VT_UI4")("rgdispid" "VT_PTR.VT_I4")) (FLAGS ( IS-FUNCTION ))) ((NAME . "Invoke") (RIID . #x60010003) (OFFSET . #x18) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_I4")("riid" "VT_PTR.GUID")("lcid" "VT_UI4")("wFlags" "VT_UI2")("pdispparams" "VT_PTR.DISPPARAMS")("pvarResult" "VT_PTR.VT_VARIANT")("pexcepinfo" "VT_PTR.EXCEPINFO")("puArgErr" "VT_PTR.VT_UINT")) (FLAGS ( IS-FUNCTION ))) ((NAME . "Item") (RIID . #x40030002) (OFFSET . #x1c) (RETURNS . "VT_VARIANT")(PARAMS ) (FLAGS ( IS-GET ))(DESCRIPTION . "Gets/sets a piece of additional data to store with the timer.")) ((NAME . "Item") (RIID . #x40030002) (OFFSET . #x20) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_PTR.VT_VARIANT")) (FLAGS ( IS-SET ))(DESCRIPTION . "Gets/sets a piece of additional data to store with the timer.")) ((NAME . "Item") (RIID . #x40030002) (OFFSET . #x24) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_PTR.VT_VARIANT")) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Gets/sets a piece of additional data to store with the timer.")) ((NAME . "Interval") (RIID . #x68030001) (OFFSET . #x28) (RETURNS . "VT_I4")(PARAMS ) (FLAGS ( IS-GET ))(DESCRIPTION . "Gets/sets the interval at which the timer fires. Set to zero to stop the timer.")) ((NAME . "Interval") (RIID . #x68030001) (OFFSET . #x2c) (RETURNS . "VT_VOID")(PARAMS ("dispidMember" "VT_PTR.VT_I4")) (FLAGS ( IS-SET ))(DESCRIPTION . "Gets/sets the interval at which the timer fires. Set to zero to stop the timer.")) ((NAME . "PulseTimer") (RIID . #x60030003) (OFFSET . #x30) (RETURNS . "VT_VOID")(PARAMS ) (FLAGS ( IS-FUNCTION ))))) ("CTimer" (TYPE . "Coclass")(GUID . "{678B8B5B-503A-11D3-92EE-0000F822352E}")(ALIASES "_CTimer""__CTimer") (FUNCTIONS )) ("__CTimer" (TYPE . "Dispinterface")(GUID . "{678B8B5D-503A-11D3-92EE-0000F822352E}")(FUNCTIONS ((NAME . "ThatTime") (RIID . #x00000001) (OFFSET . #x0) (RETURNS . "VT_VOID")(PARAMS ) (FLAGS ( IS-FUNCTION ))(DESCRIPTION . "Raised when the timer fires.")))) ("EMsgResponse" (TYPE . "Enum")(GUID . "{678B8B57-503A-11D3-92EE-0000F822352E}")(FUNCTIONS )) ("EErrorTimer" (TYPE . "Enum")(GUID . "{678B8B5C-503A-11D3-92EE-0000F822352E}")(FUNCTIONS )) )))