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+组件的机器上否则,你的组件将安装不上(提示类型库找不到,当然有比这更好的方法了,自己琢磨好了),如果谁能做到不用它就好了,毕竟自己的东西好搞个其他的东东真不好看:(