Automation In C++ Builder (转)

Automation In C++ Builder (转)[@more@]

  Automation:自动化服务器,是基于COM技术的,它可以是其它应用程序驱动的组件.ocx,或者单独的exe文件,它有三种类型: 进程内服务器,本地服务器,进程服务器,无论如何作为服务器,它必须至少包含一个或多个供其它应用程序联接和访问的IDispatch接口,自动化服务器可以没有界面(UI).
a.进程内服务器:它不可以单独运行,没有单独的进程地址空间,准确地说它在自动化控制器的进程内运行,这类服务器包括DLL,OCX.
b.本地服务器:这类服务器有自已的进程地址空间,但必须和自动化控制器同在一台机器上运行.
c.进程服务器:和本地服务器一样,它有自已的进程地空间,但它和自动化控制器不在同一台机器上,它与自动化控制器位于不同的机器.
自动化服务器和DLL的最大区别在于:自动化服务器由于与编程语言的无关性,因此它只能使用有限的数据类型,而DLL在特定的语言环境中则可以使用任何数据类型.
  IDispatch接口是自动化服务器的核心所在,也是自动化服务器的机制,它是在不同语言工作下的接口,所谓自动化控制器就是使用IDispatch接口来访问Automation服务器对象的客户,具体访问过程:作为自动化控制器必须首先创建Automation服务器对象,然后通过IUnknown接口中的QueryInterface方法获得IDispatch接口指针,IDispatch接口通过内部的dispids结构来跟踪服务器中的属性和方法,dispid是服务器中每个属性和方法的唯一标识,控制器通过IDispacth接口获得每个属性和方法的dispid后,就将它传给
dispids结构,不过这个结构是在运行期有效(也就是说它们只能在运行期被访问,具体地说在运行期间控制器通过GetIDSOfName来访问该结构),所以这种访问方式称为后绑定.如果在编译期间就可以访问该结构就称为前绑定,双接口就属于前绑定.
  双接口(VTable Interface),也称用户自定义接口,不过它的实现是由VTable(虚拟函数表),所以也叫VTable Interface,它的访问速度要较IDispatch接口快,理由在于:VTable可以看作是一个虚拟函数列表,它的最初三个入口用于存放IUnknown(所有接口的基类)接口的三个函数的地址,(QueryInterface,AddRef,Release),紧接着就是IDispacth接口的四个函数的地址,其它的就存放服务器各属性和方法的地址,如果此时包含类型库头文件,那么VTable可以从类型库中获取任一dispids结构,并在编译期间就绑定在VTable外壳上(也就是TCOMI****),这样就可以直接访问VTable接口来访问服务器中的属性和方法,从而避免调用IDispatch的GetIDSOfNames和Invoke方法,所以它的访问速度要快于IDispacth接口,下面将写一个简单的服务器和客户端来作演示,我只贴出主要部分代码:
//Server:Written In September,2002
STDMETHODIMPL T****:: __fastcall GetData(BSTR *sList)
{
  TStrings *pList=new TStringList();
  try
  {
  TStrings *pList=new TStringList();
  TQuery *Query=new TQuery(NULL);
  Query->DatabaseName="all_ttmis";
  Query->Close();
  Query->sql->Clear();
  Query->SQL->Add("select * from A0");
  Query->Open();
  Query->First();
  while(!Query->Eof)
  {
  pList->Add(Query->FieldbyName("Specified Field")->AsString);
  Query->Next();
  }
  *sList=(WideString)(pList->Text).Detach();
  Query->Close();
  delete pList;
  delete Query;
  }
  catch(Exception &E)
  {
  if(pList)
  {
  delete pList;
  }
  if(Query)
  {
  delete Query;
  }
  return Error(E.Message.c_str(),IID_IYourInterface);
  }
  return S_OK;
}

//Calling At Client

//Method 1:IDispacth Interface
void __fastcall TForm1::Button1Click(Tobject *Sender)
{
  WideString S;
  IYourInterfaceDisp app;
  app.BindDefault();
  app.GetData(&S);
  TStrings *pList=new TStringList();
  pList->Text=String(S);
  for(int i=0;iCount;i++)
  {
  Memo1->Lines->Add(pList->Strings[i]);
  }
  app.Unbind();
  delete pList;
}

//Method 2:VTable Interface
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  WideString S;
  TCOMIYourInterface app=CoYourInterface::Create();
  app->GetData(&S);
  TStrings *pList=new TStringList();
  pList->Text=String(S);
  for(int i=0;iCount;i++)
  {
  Memo1->Lines->Add(pList->Strings[i]);
  }
  delete pList; 
}

以上是本人对COM的理解，还望各位COM大侠指教.

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/10752043/viewspace-993457/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/10752043/viewspace-993457/