RTX客户端插件开发 for Delphi XE6 (一)

前段时间利用周末的时候捣鼓了下RTX客户端插件的开发, 仔细研究了下他的帮助文档, 以及给出的C++插件的模版. 个人因为热衷于Delphi不太喜欢用c++,故而一心想使用Delphi开发一个. 通过不断反复的看他的例程及文档, 终于用Delphi完善了他提供的一些接口.

因为插件是基于COM的, 用Delphi可以轻意创建一个 COM库, 具体怎么创建及导入其它库这里我也不再说了,  跟据文档的要求我们需要开发客户端的插件需要继承IRTXCModule和IRTXCPlugin两个接口,并实现以下函数

    function  Get_Identifier: WideString; safecall;  
    function  Get_ModuleSite: IDispatch; safecall;
    function  Get_Name: WideString; safecall;
    function  OnInvoke(Receiver, Parameter, Extra: OleVariant): OleVariant; safecall;
    procedure OnAccountChange; safecall;
    procedure OnLoad(const RTXCModuleSite: IDispatch); safecall;
    procedure OnUnload(Reason: RTXC_MODULE_UNLOAD_REASON); safecall;
    function  Get_Info(Field: RTXC_PLUGIN_INFO_FIELD): WideString; safecall;

PS: 上面几个函数的具体祥情可以参考RTX客户端开发文档.

 

这样我们就实现了一个什么都没不做的插件. 用Delphi做起来是很简单的事, 一个空的还是没什么用的, 我们需要做些功能.

开源地址: http://git.oschina.net/ying32/RTXCPluginForDelphiSDK/