"Reprint" COM Component design and application (10)--idispatch interface for Vc.net

Original: http://vckbase.com/index.php/wv/1225.html

First, preface

Finally wrote the tenth time, I have been looking forward to writing this back, yes, why? Because automation (automation) is a very common, very useful, very exciting COM feature. Because WORD, EXCEL and other OFFICE software provides the "macro" function, even we use the VC development environment also provides "macro" function, more because of HTML, ASP, JSP and so on to rely on scripting (script) support, but also reflects the importance of automation interface.

If you are using the vc6.0 development environment, please read the previous one.

If you use Vc.net 2003, please continue ...

Second, IDispatch interface

In the case of a compiled language, we can have the compiler load the type library at compile time, which is the description of the loading interface. In the seventh article, we use #include method and #import method respectively to achieve this. Once the type library is loaded, the compiler knows how to compile the call to the interface function---this is called "pre-bind". However, if you want to use the component in a scripting language, the problem is big, because the scripting language is interpreted, and it executes without knowing the exact address of the function. The Automation interface was born---"post-bind".

The automation component is actually the component that implements the IDispatch interface. The IDispatch interface has 4 functions that interpret the language's executor to perform the functions provided by the component through the only 4 functions. The IDispatch interface is described in IDL form as follows: (note 1)

[Object, UUID (00020400-0000-0000-c000-000000000046),//IDispatch interface IID = IID_IDispatch pointer_default (unique) ]interface idispatch:iunknown{typedef [UNIQUE] IDispatch * lpdispatch;//goto definition IDispatch * for lpdispatch HRESULT Get Typeinfocount ([out] uint * pctinfo);//For these two functions of the type library, let's say later the HRESULT gettypeinfo ([in] uint Itinfo,[in] LCID Lcid,[out] ity    Peinfo * * pptinfo); HRESULT GetIDsOfNames (//Based on function name, get function ordinal (DISPID) [in] refiid riid, [In, size_is (cnames)] Lpole STR * Rgsznames, [in] UINT cnames, [in] lcid lcid, [out, size_is (cnames)] DIS    PID * rgdispid); [local]//local function HRESULT Invoke (//Based on function ordinal, explanation execution function function [in] DispID dispidmember, [in] refiid R                IID, [in] lcid lcid, [in] WORD wflags, [in, Out] dispparams * pdispparams, [out]      VARIANT * Pvarresult, [out] excepinfo * pexcepinfo,          [out]    UINT * puargerr); [Call_as (Invoke)]//remote version function HRESULT Remoteinvoke ([in] DispID dispidmember, [in] refiid Rii                D, [in] the LCID lcid, [in] DWORD dwFlags, [in] dispparams * pdispparams, [out] VARIANT * Pvarresult, [out] excepinfo * pexcepinfo, [out] UINT * Pargerr, [in ] UINT Cvarref, [In, size_is (CVARREF)] UINT * RGVARREFIDX, [in, Out, size_is (cvarref)] VARI Antarg * rgvarref);}

　　

The above IDispatch interface function explanation, we leave to the back in the introduction. How do you implement these functions in a component program? Fortunately, fortunately, just like IUnknown, MFC and ATL have helped us finish. This time we focus on component authoring, and the next time we describe the component invocation method.

Iii. implementing automation components with MFC

I wrote this whole series of articles---"COM Component design and application", mostly using ATL to write component programs, but because automation is very useful, in the subsequent articles, but also to introduce the components of the "event" function, but also to explain how in MFC programs like WORD support "macro" function. These all need to use MFC, so give the reader a chatter:-)

3-1: Build a solution

3-2: Build an MFC DLL project with the project name "Simple7"

3-3: Be sure to select "Automation" in the additional function, remember! Remember!

3-4: Add New Class

3-5: Support Automation in new class

class name you just write a class name.

The base class must derive from Ccomtarget, only it provides IDispatch support.

Automation-No indication does not support automation, you have to choose it, that's all.

Automation - Automation supports automation, but cannot be instantiated directly. Later in the explanation of a number of IDispatch to use it, now do not worry.

Automation-can be created by type ID Be sure to select this project, so we in the subsequent call, VB can CreateObject (), VC can CreateDispatch () to the Component Object instantiation. Note that this ID is actually the ProgID of the component.

3-6: Select interface, add function

3-7: Add function. We're going to write an integer addition function add ().

3-8: Add another function Upper () to convert the string case.

3-9: OK, let's start typing the program code:

Long Cdispsimple::add (long N1, long N2) {afx_manage_state (AfxGetStaticModuleState ()); return n1 + n2;} BSTR cdispsimple::upper (lpctstr str) {afx_manage_state (AfxGetStaticModuleState ()); CString strresult (str); Strresult.makeupper (); return strresult.allocsysstring ();}

　　

3-10: Compile Registration

If the above operation has been inadvertently wrong, then you can correct it by hand.

One, you can open the IDL file for modification, to be particularly careful in the declaration of the function, there is a [ID (n)] function ordinal, can not be messy;

The second, synchronously modifies the function declaration and the function body in the h/cpp;

Third, in the CPP file, according to the situation also to modify the Begin_dispatch_map/end_dispatch_map () function mapping macro.

After compiling correctly, Vc.net 2003 is much smarter than vc6.0, and it automatically registers components. If you copy to another computer, you also need to manually perform Regsvr32.exe to register.

Iv. Implementing a dual Interface component with ATL (Refer to "COM Component design and application (vi)" for operating methods and procedures)

4-1: Build an ATL project with the project name "Simple8"

4-2: Select DLL type, non-attribute mode, do not select any additional options

4-3: Add a new class, select an ATL Simple Object

4-4: Enter abbreviation and options, option by default, that is, dual interface mode (note 2)

4-5: Add function. Select interface, right-click menu, Add Method ...

ADD ([in] Variant v1, [in] Variant v2, [out, retval] variant * pVal);

Upper ([in] BSTR str, [Out,retval] BSTR * PVal);

For the Add () function, you can still use the add ([in] long N1, [in] long N2, [out,retval] long * pVal) mode. But this time we did not use a long, but instead used the VARIANT to do the parameter and return value. Here I first sell a xiaoguanzi, look down, I know the use of the wonderful VARIANT of the place.

4-6: Complete code

STDMETHODIMP Cdispsimple::add (Variant V1, Variant V2, Variant *pval) {:: VariantInit (PVal);//Always initialize the return value is a good habit CComVariant V _1 (v1); CComVariant v_2 (v2); if ((V1.vt & VT_I4) && (V2.VT & VT_I4)//If all are integer types {//there is no use = = here, and operator & is used, you know Is that why?  V_1.changetype (VT_I4);//Convert to Integer v_2.changetype (VT_I4);//convert to Integer PVAL->VT = Vt_i4;pval->lval = V_1.lval + v_2.lVal;// Addition}else{v_1.changetype (VT_BSTR);//Convert to String V_2.changetype (VT_BSTR);//Convert to String CComBSTR BSTR (V_1.bstrval); BSTR. Appendbstr (v_2.bstrval);//String Connection PVAL->VT = Vt_bstr;pval->bstrval = BSTR. Detach ();} return S_OK;} STDMETHODIMP Cdispsimple::upper (BSTR Str, BSTR *pval) {*pval = null;//always initialize the return value is a good habit CComBSTR s (str); S.toupper ();//Convert to uppercase *pval = S.copy (); return S_OK;}

　　

The Xiaoguanzi, which has just been sold, is now revealed ... The addition function add () does not use the long type, while the benefit of using a variant is that the function internally determines the parameter type, and if it is an integer, the integer addition, or string addition (string addition is the string join). In other words, if the parameter is a variant, then we can implement the variable parameter type of the function. It's a throat, it's cool!

V. Examples of calls in scripts

Open the Notepad program, enter the script, and save it as a Xxx.vbs file. Then in the Explorer you can double-click to run.

If you have the ability, you can also use JScript to write the above program, and then save as a xxx.js file, you can also run in the explorer. Another point to note is that the Script program file icon (Win 2000) is, if you are not such (there is a software called "XX king梁肇new". The person writing this software is too low, it actually uses the. vbs extension file as its data stream file, which destroys the system default file type innuendo mode, cough ... ), you need to reset it by:

Vi. examples of use in WORD

6-1: Record a macro program

6-2: Choose "Keyboard", of course, you can also put this "macro" program on the "toolbar" up. Here we randomly specify a shortcut key, such as CTRL + Z

6-3: Start recording, below you casually input something. Then click "Stop".

6-4: Next, we execute the menu, select the macro that was just recorded, and then edit it

6-5: Click "Edit" button, enter the following program:

Do not explain, if you will be a little bit of VB, you can read this dongdong ha. Then save the editor that closes VBA (note 4).

6-6: Execute, execute, see what effect it is ...

Then press the shortcut key CTRL + Z

You have expanded the function of MS WORD, hey la la la la, Hey la la, the sky out of rosy clouds ah ... We just gave a simple example, in fact, this example does not have any practical significance, because the WORD itself has a case of the conversion function. But with this small example, you can realize the function of the automation component, is it enough?!

Vii. Summary

Not a summary! Hey...... Fooled,:-).

Note 1: Later we describe the interface functions, all using IDL form.

NOTE 2: Dual interface, is a special interface to support the IDispatch interface, the following will be said

Note 3:vba is a language that specializes in Office development---Visual Basic for application

"Reprint" COM Component design and application (10)--idispatch interface for Vc.net