讀取表單數(shù)據(jù)庫(kù)-U8界面按鈕二次開(kāi)發(fā)手冊(cè)

U8界面按鈕二次開(kāi)發(fā)手冊(cè)適用范圍U8ToolBar原則上都可以支持二次開(kāi)發(fā)行為，但由于某些界面沒(méi)有這方面的需求，所以并沒(méi)有支持二次開(kāi)發(fā)功能如何檢查是否支持二次開(kāi)發(fā)在一個(gè)界面上同時(shí)按住Ctrl+Shift并點(diǎn)擊任何一個(gè)按鈕，這樣你所需要的信息將被Copy到寫字板(附件中的寫字板)上，（注意不是記事本notepad）。數(shù)據(jù)預(yù)置數(shù)據(jù)預(yù)置在Meta庫(kù)中的Meta數(shù)據(jù)庫(kù),表AA_CustomerButton中。說(shuō)明：

字段名說(shuō)明cButtonID按鈕ID，GUIDcButtonKey按鈕KeycButtonTypedefault表示一般按鈕，menu表示菜單，system表示替換系統(tǒng)按鈕的功能，執(zhí)行自己的方法。cProjectNO不允許使用U870項(xiàng)目號(hào)，客戶化項(xiàng)目用U8CustDefcFormKey無(wú)用cVoucherKey單據(jù)的KeycKeyBefore如果cButtonType是default則此鍵表示自定義按鈕前的按鈕key如果cButtonType是menu則表示菜單所在的按鈕如果cButtonType是system則表示需要替換的按鈕keyiOrder無(wú)用cGroup分組IEDIT，ICOMMONcCustomerObjectName組件名cCaption標(biāo)題cLocaleID語(yǔ)種zh-cn,zh-tw,en-uscImage圖標(biāo)的文件名cHotKey快捷鍵如Ctrl+AbInneralCommand是否內(nèi)部命令，設(shè)置為1cVariant自定義內(nèi)容,里面的值會(huì)傳給處理的組件cVisibleAsKey設(shè)置顯示狀態(tài)與系統(tǒng)的那個(gè)按鈕鍵值一致cEnableAsKey設(shè)置Enable狀態(tài)與系統(tǒng)的那個(gè)按鈕鍵值一致銷售訂單的數(shù)據(jù)預(yù)置腳本銷售訂單的保存按鈕后面增加一個(gè)按鈕的腳本INSERTINTO[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','U8Test.mytestclass','測(cè)試','zh-cn','','測(cè)試','Ctrl+N',1,'測(cè)試數(shù)據(jù)','save','save')注意：U8Test.mytestclass類需要注冊(cè)，否則會(huì)報(bào)Activex不能創(chuàng)建對(duì)象。直接替換銷售訂單的保存按鈕按鈕的腳本INSERTINTO[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','U8Test.mytestclass','測(cè)試','zh-cn','','測(cè)試','Ctrl+N',1,'測(cè)試數(shù)據(jù)','save','save')注意：U8Test.mytestclass類需要注冊(cè)，否則會(huì)報(bào)Activex不能創(chuàng)建對(duì)象。組件接口新建一個(gè)VB工程名稱位U8Test新建一個(gè)VB類（名稱為mytestclass），并寫入以下方法即可，下面是讀取u8單據(jù)內(nèi)容‘執(zhí)行按鈕，objVoucher為單據(jù)或列表對(duì)象‘VarentValue為在表中預(yù)置的cVariant的值。PublicFunctionRunCommand(ByValobjLoginAsObject,ByValobjFormAsObject,ByValobjVoucherAsObject,_ByValsKeyAsString,ByValVarentValueAsVariant,ByValotherAsString)DimstrStringStr=objVoucher.HeaderText(“單據(jù)表頭字段名稱”);‘執(zhí)行數(shù)據(jù)庫(kù)代碼自己網(wǎng)上找EndFunction‘初始化PublicFunctionInit(ByValobjLoginAsObject,ByValobjFormAsObject,ByValobjVoucherAsObject,msbarAsObject)EndFunction‘在執(zhí)行系統(tǒng)按鈕只前調(diào)用,Cancel后會(huì)不再執(zhí)行系統(tǒng)方法。PublicFunctionBeforeRunSysCommand(ByValobjLoginAsObject,ByValobjFormAsObject,ByValobjVoucherAsObject,_ByValsKeyAsString