U8界面按钮二次开发手册

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

U8界面按钮二次开发手册

适用范围

U8ToolBar原则上都可以支持二次开发行为,但由于某些界面没有这方面的需求,所以并没有支持二次开发功能

如何检查是否支持二次开发

在一个界面上同时按住Ctrl+Shift并点击任何一个按钮,这样你所需要的信息将被Copy 到写字板(附件中的写字板)上,(注意不是记事本notepad)。

数据预置

数据预置在Meta库中的Meta数据库,表AA_CustomerButton中。

说明:

销售订单的数据预置脚本

销售订单的保存按钮后面增加一个按钮的脚本

INSERT INTO [AA_CustomerButton]([cButtonID], [cButtonKey], [cButtonType], [cProjectNO], [cFormKey], [cVoucherKey], [cKeyBefore], [iOrder], [cGroup], [cCustomerObjectName], [cCaption], [cLocaleID], [cImage], [cToolTip], [cHotKey], [bInneralCommand], [cVariant], [cVisibleAsKey], [cEnableAsKey])

VALUES(newid(), 'btntest','default', 'U8CustDef',

'17', '17','save', '0', 'IEDIT','','测试',

'zh-cn','','测试','Ctrl+N',1,'测试数据','save','save')

注意:类需要注册,否则会报Activex不能创建对象。

直接替换销售订单的保存按钮按钮的脚本

INSERT INTO [AA_CustomerButton]([cButtonID], [cButtonKey], [cButtonType], [cProjectNO], [cFormKey], [cVoucherKey], [cKeyBefore], [iOrder], [cGroup], [cCustomerObjectName], [cCaption], [cLocaleID], [cImage], [cToolTip], [cHotKey], [bInneralCommand], [cVariant], [cVisibleAsKey], [cEnableAsKey])

VALUES(newid(), 'btntest2','system', 'U8CustDef',

'17', '17','save', '0', 'IEDIT','','测试',

'zh-cn','','测试','Ctrl+N',1,'测试数据','save','save')

注意:类需要注册,否则会报Activex不能创建对象。

需要将"”注册成COM组件

方法[如果是C#开发的话]:cmd下输入以下内容:

"C:\Windows\\Framework\ "你的DLL程序集名称"

组件接口

新建一个VB类,并写入以下方法即可

‘执行按钮,objVoucher为单据或列表对象

‘VarentValue为在表中预置的cVariant的值。

Public Function RunCommand(ByVal objLogin As Object, ByVal objForm As Object, ByVal objVoucher As Object, _

ByVal sKey As String, ByVal VarentValue As Variant, ByVal other As String)

End Function

‘初始化

Public Function Init(ByVal objLogin As Object, ByVal objForm As Object, ByVal objVoucher As Object, msbar As Object)

End Function

‘在执行系统按钮只前调用,Cancel后会不再执行系统方法。

Public Function BeforeRunSysCommand(ByVal objLogin As Object, ByVal objForm As Object, ByVal objVoucher As Object, _

ByVal sKey As String, ByVal VarentValue As Variant, ByRef Cancel As Boolean, ByVal other As String)

Cancel = False

End Function

相关文档
最新文档