《U8门户开发手册》由会员分享，可在线阅读，更多相关《U8门户开发手册（26页珍藏版）》请在金锄头文库上搜索。
1、U8 门户开发手册1. 功能概述如何使伙伴二次开发的程序很好地和 U8 产品集成在一起？需要满足什么条件的程序才能和门户集成？如何开发一个满足这个条件的程序？本文将为您解答这些问题。2. 名词解释2.1 菜单调整工具功能：调整菜单位置；新增、修改、删除菜单（除U8 系统菜单外） 。菜单调整工具在UAP 中，通过菜单“工具菜单调整工具”进入。2.2 idt.dll文件位置：在U8 安装目录的Portal 目录里。该文件其实是一个xml 文件，可以用任何文本编辑器打开。其内容描述了双击每个末级菜单项目时需要调用的物理程序。在872 版 本 里 ， idt.dll并 不 在 安 装 盘 里 ， 而
2、是U8门 户 第 一 次 运 行 时 通 过UFSystem.UA_IDT表里的内容动态生成的。当UFSystem.UA_IDT有变化时， U8 门户 会重 新 生 成 idt.dll 文件 。 有 了 这种 机 制 后 ，菜 单 调 整 工 具 就 可 以 通过 维 护 UFSystem.UA_IDT 里的内容，从而达到维护 idt.dll 的目的。3. 如何开发可与门户集成的VB dll3.1 代码修改引用工程 UFPortalProxyInterface文件位置： U8 安装路径 PortalUFPortalProxyInterface.dll1/26相关代码修改clsProductFa
3、cade 文件为门户的入口文件，即在 idt.dll 文件后 assembly 项所对应的类名。如下所描述的：首先， idt.dll中 assembly 属性描述的对应类要实现接口ILoginalbe 。比如 idt.dll中描述了如下信息：则要在 clsProductFacade中实现 ILoginable接口。即用代码：Implements UFPortalProxyInterface.ILoginable然后在该接口的实现函数中转发调用原先工程中的Login,CallFunction,Logoff三个方法，具体参见后附的例子。在左树启动一项命令时依次调用Login 和 CallFunct
4、ion。在门户退出或在权限管理中结束该产品时调用LogOff 。子系统必须自己维护是否已经进行了子系统登录过程，业务系统须维护子系统是否已经登录。Login 对象从 g_business 中通过调用 GetVBclsLogin 方法获得。各接口含义如下：1、Login 接口 ( Private Function ILoginable_Login() As Boolean )，不管弹出的是模式窗体还是非模式窗体，此接口在成功登录后须返回True,而且要保证登录成功后，第二次调用此接口时也要返回 True。只有在登录失败后方可返回 False。也就是说此接口返回值的含义是是否已经成功登录子系统。2
5、、 LogOff 接口 ( Private Function ILoginable_LogOff() As Boolean )，此接口的含义是执行 LogOff 过程， 如查成功使该子系统牌 LogOff 状态返回 True，否则返回 False。也就是说，如果该子统还未登录，则真接返回False 就可以了。如果系统处于已经登录的过程，则执行业务组原有所需的LogOff过程，如果执行功能，正确LogOff 了子系统，则返回True，否则返回 False。如果在实际程序中没有此过程，则直接返回True 即可。3、 CallFunction 接口 (Private Function ILogina
6、ble_CallFunction()As Boolean) 。如果 861产品没有子系统登录过程的产品，此值须返回True.4、对于显示模式窗体的产品，如果已经申请了任务，请在模式窗体退出时自已清除任务。实现这三个方法的例子如下：Private Function ILoginable_Login() As BooleanIf g_bLogined = True ThenILoginable_Login = TrueExit Function2/26End IfIf (Not g_business Is Nothing) And g_bLogined = False) ThenDim oLogi
7、nTmp As ObjectSet oLoginTmp = g_business.GetVBclsLogin()Set g_oLogin = oLoginTmpILoginable_Login = Login(oLoginTmp)If (ILoginable_Login = True) Theng_bLogined = TrueEnd IfElseILoginable_Login = Not g_business Is NothingEnd IfEnd FunctionPrivate Function ILoginable_LogOff() As BooleanIf (g_bLogined =
8、 True) ThenILoginable_LogOff = LogOff()If (ILoginable_LogOff = True) Then g_bLogined = FalseEnd IfElseILoginable_LogOff = TrueEnd IfEnd Function增加 Business属性可读可写，且对大小写敏感。 此属性维护一个对于此业务工程全局变量， 以实现和 VB程序和 870Portal 的交互。参考实现如下：Public Property Get Business() As ObjectSet Business = g_businessEnd Property
9、Public Property Set Business(busVal As Object)Set g_business = busValEnd Property增加全局变量新建一 module 文件，并加入如下全局变量：Public g_business As ObjectPublic g_bLogined As Boolean3/26三种窗体修改嵌入 Portal 的窗体文件原来有 MdiExtender 控件的窗体要嵌入 Portal 的窗体修改方法：调用 CreateFormEnv方法调用 ShowForm 方法每个窗体都要有方法ExitForm修改第一次弹出就是模态的窗体可以直接使用
10、通过采用 VB 窗体的 Form.Show (vbModal) 的方式，也调用 ShowForm方法来显示此窗体。由嵌入 Portal 的窗体弹出的窗体，不作修改，如果是模式窗体，请在此窗体上加入UFFormPartner 控件的修改在 Settoolbar之前将 g_business传入在 Settoolbar之前设置 Tag 信息设置微软 Toolbar 每个 Button 的 Tag 信息调用 CreatePortalToolbarTag方法设置示例button.Tag =CreatePortalToolbarTag(“ ICON_NEW” , ” ICOMMON” , ” Portal
11、Toolbar” )注意： 严禁创建多次图标人机工程部给出完整的图标，并制定相应文件的命名规格放在 %U8SOFT%的icons 目录下直接使用图标的文件名 ( 不需扩展名 )4/26分组常用 (ICOMMON) ：如打开、保存等编辑 (IEDIT) ：如增行、拷贝单元格等处理 (IDEAL) ：如审核、分单等查询 (ISEARCH) ：如过滤、联查等类型PortalToolbar，目前填入此值即可。在窗体的 Unload事件中加入Set UFToolbar1.Business = Nothing中间过程判断窗体是否打开FormIsOpened设置并激活某个已经存在的窗体SetFormActi
12、ve在显示过程中 (窗体已经显示 )关闭自身窗体CloseForm3.2 常见问题程序已经修改，双击门户节点时没有反应，调用状态进不了VB 程序；未正确修改clsProductFacade 文件；窗体已经嵌入到Portal 中，但 Toolbar 的相关信息未转移到门户的工具栏上；是否正确设置了每个Button 的 Tag 信息；5/263.3 参考显示嵌入 Portal 的窗体Public Function ShowForm(ByVal obj As Object, ByVal SubID As String, ByVal sKey As String, Optional modalable As Boolean = False, Optional DockToProtal As Boolean = True, Optional ByVal vfd As Object) As Stringobj: Form 对象；SubID: 子产品号；sKey: Key, 注意不能是form 的 Hwnd, 在窗体的生命周期中，此值必须唯一；modalable: 该窗体是否为Model 窗口；DockToProtal :是否要嵌入到Portal 中；vfd: 由 CreateFormEnv 对象的返回对象；
