首页  编辑  

DELPHI操纵COM+目录

Tags: /超级猛料/COM、ActiveX,DDE/   Date Created:

DELPHI 操纵COM+目录

类 别:COM & ActiveX

1.首先你要了解COM+注册和运行机制

2.如果你对上面了解,下面的你可以不看了,呵呵

3.导入COM+目录组件类型库(COMADMIN_TLB.PAS),使用DELPHI菜单中的PROJECT-Import Type Library...项目弹出一个对话框,在对话框的列表框中找到COM+ADMIN TYPE LIBARY(VERION 1.0)选中它,按INSTALL按钮。安装之后会在DELPHI的ACTIVEX面板上生成三个非可视化控件(其实是导入了类型库COMADMIN_TLB。在DELPHI的IMPORTS目录能找到COMADMIN_TLB.PAS,DLEPHI给加了一个外套,如果你对COM很熟悉的话,那么对此丝毫不为惊讶)。

 通过这三个控件,就可以操纵COM+目录服务了(其实就是使用组件服务里的SYSTEM APPLICATION下的一些组件)

4.使用方法:

 组件1: TComadminCtalog;

   方法与属性: procedure InstallApplication(const bstrApplicationFile: WideString;

                                const bstrDestinationDirectory: WideString; lOptions: Integer;

                                const bstrUserId: WideString; const bstrPassword: WideString;

                                const bstrRSN: WideString);//注册安装

                    {参数说明

                         bstrApplicationFile 代表由组件服务导出的安装文件(.MSI)

                         bstrDestinationDirectory 安装COM+组件后DLL文件放置的位置

                                                  如果指定的是相对路径如('MYDLLPATH')那么DLL将放置在MSI文件

                                                  的目录下的MYDLLPATH目录中,如果为空,则放置在

                                                  Program Files\C:\Program Files\ComPlus Applications\{你的应用的GUID}目录下

                   }

                   procedure InstallComponent(const bstrApplIdOrName: WideString; const bstrDLL: WideString;

                          const bstrTLB: WideString; const bstrPSDLL: WideString);// 注册组件

                   {参数说明

                    bstrApplIdOrName 代表应用的GUID或名称;

                    bstrDLL 代表组件的DLL文件名(全名,包含路径);

                    bstrTLB 代表组件的DLL的类型库名(全名,包含路径);

                    bstrPSDLL 组件的描述字符;

                   }

                   procedure StartApplication(const bstrApplIdOrName: WideString);//启动应用

                   {参数说明

                     bstrApplIdOrName 代表应用的GUID或名称;

                   }

                   procedure ShutdownApplication(const bstrApplIdOrName: WideString);//停止(关闭)应用

                   {参数说明

                     bstrApplIdOrName 代表应用的GUID或名称;

                   }

       其余的方法和属性请查看COMADMIN_TLB.PAS文件了,了解以上组件的方法之后就可以进行简单的COM+组件的操纵了

重要说明: 如果使用DELPHI的MIDAS做了COM+应用程序的话,那么请把组件服务中的BDE-MTS和MIDAS.DLL也打包安装到你要安装自己的COM+组件的机器上否则,你的组件将安装不上(提示类型库找不到,当然有比这更好的方法了,自己琢磨好了),如果谁能做到不用它就好了,毕竟自己的东西好搞个其他的东东真不好看:(