K3常用二次开发.doc

word1 常用二次开发方法1.1 登陆界面图片修改1) 在中间层方式：在中间层KD目录新建两个图片文件：适用于版本+PT007378，或V11版本与以后版本适用于版本+PT007378，或V11版本与以后版本MAIN_PIC_LOG_RIGHT_FLOWCHART.bmp,适用于版本+PT007378，或V11版本MAIN_PIC_LOG_LEFT_FLOWCHART.bmp,适用于版本+PT007378，或V11版本MAIN_PIC_LOG_LEFT.bmp,适用于版本+PT007378，或V11版本MAIN_PIC_LOG_RIGHT.bmp,适用于版本+PT007378，或V11版本该方式不需要每个客户端机器安装图片，登陆时自动显示2) 客户端方式：直接修改以如下图片文件，适用于V12与以后版本：3) 企业LOG方式在中间层新建一个文件夹，命名为eptlogo并将其设置为只读共享，然后制作两个BMP格式的图片，分别作为logo和背景图，大小为145×180，分别命名为enterprise_logo.bmp,enterprise_bg.bmp,在客户端的主控台编辑器启用企业界面即可。

4) 图标替换LOG 替换图片：KD文件夹下名称长*宽(像素)说明LOGIN_PIC_LOG_BOTTOM.bmp 142*39登录界面底部LOGIN_PIC_LOG_TOP.bmp331*101登录界面顶部需要登录主控台->系统->设置->主控台编辑->选项->取消启用企业界面应用方案V12.0以后不需要下面文件：MAIN_PIC_LOG_LEFT.bmp614*63主控台左上MAIN_PIC_LOG_RIGHT.bmp186*36主控台右上MAIN_PIC_LOG_LEFT_FLOWCHART.bmp614*71流程图左上MAIN_PIC_LOG_RIGHT_FLOWCHART.bmp 191*36流程图右上主控台子系统图标替换：把图标文件后缀名改为.dat文件，替换为：D:\Program Files\Kingdee\K3ERP\SYSTEMICON登录界面图片替换：(该替换方式不支持只替换中间层后客户端自动替换)V12.1 V12.2：(图片名称以成长版简体中文为例，如是WISE如此将KEE替换为KUE，如是繁体或英文环境如此将CHS替换为CHT或EN)KEE_imgLogo.bmp 370*87登录界面左上角KEE_ImgLogin.bmp617*408登录界面背景KEE_imgLogoys.bmp92*52登录界面右下角友商网图标kee_imglogo2.bmp110*52登录界面右下角Kindee图标KEE_help_CHS.gif618*76用户手册顶部图标KEE_KDTool_CHS.gif793*75客户端工具包顶部图标KEE_Login_ACCT_CHS.bmp440*270帐套管理背景图片KEE_About_logo_CHS.bmp365*102关于界面LOGO1.2 主控台无界面登陆适用版本：(K/3V11.0.1+PT016290或V12以上版本)1) 域用户登录：提供命令行参数:KDMain.exe -LoginWin|账套代码|机构密码 ,无界面直接登录到K/3系统主控台2〕命名用户登录：提供命令行参数KDMain.exe -LoginUser|账套代码|机构密码|用户名|用户密码, 无界面直接登录K/3系统主控台3） 参数之间的分隔符默认为〞|〞，由于用户密码可能包含特殊字符，用户可以通过修改注册表改变分隔符，注册表参数：路径：HKEY_CURRENT_USER\SoftWare\KingDee\K3 键：LoginParm4） 获取账套代码的接口组件名：组件部署：客户端%Kdsystem%程序名：方法名：GetAccountList参数描述参数：无返回值类型：ADODB.Recordset，包含字段：序号字段名描述1FAcctID账套ID2FAcctNumber账套代码3FAcctName账套名称5） 测试登录参数设置是否成功的接口组件名：组件部署：客户端%Kdsystem%程序名：方法名：LoginUser参数描述Public Function LoginUser(ByVal sLoginType As String _ , ByVal sAcctNumber As String _ , ByVal sOrgPass As String _ , ByVal sUserName As String _ , ByVal sUserPass As String) As String参数:序号字段名参数类型描述1sLoginTypeString登录方式：-LoginWin 域用户身份登录-LoginUser 命名用户身份登录2sAcctNumberString账套代码3sOrgPassString组织机构密码例如：账套代码为：10.02,如此为组织机构10的密码.4sUserNameString用户名,域用户身份登录时为空5sUserPassString用户密码,域用户身份登录时为空返回值类型：String，空字符串代表登录成功，否如此登陆不成功,内容为登录不成功的原因。

1.3 根底资料的图片读写  1.1〕从数据库取得图片的二进制数据     Dim bytFile() As Byte  ‘根据取数SQL生成记录集:select FFile from t_Accessory     bytFile= rs.Fields("FFILE")1.2)保存到文件     Dim smFile As adodb.Stream      smFile.Type = adTypeBinary    smFile.Write bytFile    smFile.SaveToFile m_sTempFileName, adSaveCreateOverWrite1.3)解压缩   Dim ozip As Object   Set ozip = CreateObject("KDZIP.ZIP")     ozip.Depress m_sTempFileName,  sFileName1.4)显示出来     Set Img.Picture = LoadPicture(sFileName)  1. 保存图片1.4 K/3自定义认证开发方法目的：提供用户可定义的K/3主控台登陆方法，用户可以按自己的方式验证，例如：实现指纹认证，声音认证。

适用于K/3V10.3与以后版本包含以下定义：Public g_strAcctName As StringPublic g_UserName As StringPublic g_UserPassWord As String包含以下两个接口Public Function SeftClientSign(strAcctName As String, UserName As String, UserPassWord As String, ErrMsg As String) As Long    If UserName = g_UserName And g_strAcctName = strAcctName And g_UserPassWord = Trim(UserPassWord) Then        SeftClientSign = 1    End IfEnd FunctionPublic Function GetSelfPassWord(ByVal strAcctName As String, ByRef UserPassWord As String) As String    '弹出指纹任证界面,直到GetSelfPassWord返回值不为空    Form1.Show vbModal    GetSelfPassWord = "test"    UserPassWord = "123"       g_strAcctName = strAcctName    g_UserName = GetSelfPassWord    g_UserPassWord = UserPassWordEnd Function5.         在账套管理>账套>参数设置，选择“自定义认证方式〞6.         在用户管理，设置用户test属性为“自定义认证方式〞7.         以test用户登陆。

1.5 根底资料插件化开发根底资料-插件接口由K3BaseDataEvents.dll提供：1、 概述要使用插件，需要写一个插件的DLL，引用K3BaseDataEvents.dll，处理其提供的接口即可 编写好插件DLL后，需要在数据库表中增加该插件的注册记录，如下：表名：t_ThirdPartyponent关键字段与意义：FTypeID：101FTypeDetailID：1-19，>=2000,核算项目类别IDFponentName：客户端插件类的ProgIDFponentSrv： 服务端插件类的ProgID – 未实现FDescription： 描述注： 其中FTypeDetailID为0时表示该插件对所有核算项目都有效，比如对所有核算项目指定统一的编码规如此、自定义某个通用行的名称等2、 K3BaseDataEvents.ItemEvents 类该类定义了核算项目编辑界面所有的事件l Public EventAfterGridLoad()加载各字段后触发，可以在该事件中处理界面初始化、默认编码等等l Public Event GridChange(ByVal lRow As Long) 某一行单元格值更新后触发l Public Event EnterGrid(ByVal lRow As Long) 焦点进入某一行触发 - 如判断使用后不允许修改l Public Event OnPressF7 (ByVal lRow As Long,ByRef RetCol As KDVBF.ReturnCollection, ByRef Cancel As Boolean)按F7时触发，可以在该事件中自己处理弹出F7操作l Public Event BeforeList(ByVal lRow As Long, ByRef strSqlReturn As String) 弹出下拉列表前触发，用strSqlReturn返回查询列表的SQL语句，要求包括FNumber、FName等字段。

l Public Event BeforeSave(Cancel As Boolean) 保存前触发 – 自定义校验数据3、 K3BaseDataEvents. ItemEditInterface 类该类定义了对核算项目编辑操作的一些属。