PowerBuilder中實(shí)現(xiàn)數(shù)據(jù)窗口列不可編輯的一種方法

PowerBuilder中實(shí)現(xiàn)數(shù)據(jù)窗口列不可編輯的一種方法

摘要：本文詳細(xì)論述了如何利用DataWindow的Protect屬性靈活實(shí)現(xiàn)列不可編輯的方法。關(guān)鍵詞：PowerBuilder；DataWindow;數(shù)據(jù)編輯1

引言通過(guò)數(shù)據(jù)窗口，用戶(hù)可以對(duì)數(shù)據(jù)進(jìn)行增、刪、改等編輯工作。為了防止用戶(hù)由于操作不慎而刪掉數(shù)據(jù)窗口中的一些重要的數(shù)據(jù)，在PowerBuilder中，需要將不可刪除數(shù)據(jù)所在的列設(shè)為不可編輯狀態(tài)。常用方法有：1）在數(shù)據(jù)窗口的設(shè)計(jì)階段將列的Tab值設(shè)置為0，或在程序運(yùn)行階段用函數(shù)動(dòng)態(tài)設(shè)置列的Tabsequence屬性為0；2）在數(shù)據(jù)窗口的設(shè)計(jì)階段將列的Edit屬性設(shè)置為DisplayOnly，或在程序運(yùn)行階段將Edit屬性的DisplayOnly置為Yes。以上方法都簡(jiǎn)單且易于實(shí)現(xiàn)，但都不夠靈活。用Tabsequence屬性置0的方法，若要恢復(fù)該列的可編輯狀態(tài)，必須在置0之前用Describe()函數(shù)先獲取該列的Tab值，之后用Modify()函數(shù)恢復(fù)該值即可將該列恢復(fù)成可編輯狀態(tài)，增加了編寫(xiě)額外代碼的負(fù)擔(dān)，而且這種方法還破壞了數(shù)據(jù)窗口的制表值順序；把DisplayOnly屬性置為Yes的方法，要求該列的StyleType必須選中Edit風(fēng)格，若該列風(fēng)格為其它類(lèi)型，如CheckBox、EditListBox等，則不能用這種方法，因此這種方法也缺乏通用性。本文采用數(shù)據(jù)窗口中列的Protect屬性來(lái)靈活實(shí)現(xiàn)列的不可編輯的方法，Protect屬性將忽略數(shù)據(jù)窗口的制表順序設(shè)置，只要列處于保護(hù)狀態(tài)時(shí)，即使該列的制表順序大于0，用戶(hù)也不能對(duì)該列進(jìn)行編輯。這種保護(hù)數(shù)據(jù)窗口列中數(shù)據(jù)的方法，它沒(méi)有破壞制表值的順序，很容易恢復(fù)列的制表值；而且Protect屬性還允許指定一個(gè)條件表達(dá)式，使同一列中某些值被保護(hù)而另外的值沒(méi)有被保護(hù)，這對(duì)在數(shù)據(jù)窗口中插入新記錄時(shí)很有利。本文詳細(xì)論述了如何利用DataWindow的Protect屬性來(lái)靈活實(shí)現(xiàn)列的不可編輯。2

Protect屬性的訪(fǎng)問(wèn)格式2.1直接訪(fǎng)問(wèn)法的格式如下：dw_controlname.Otect=value或dw_controlname.Object.#tect=value.其中value值為0或1，為1時(shí)該列處于保護(hù)狀態(tài)，不可編輯;為0時(shí)該列處于非保護(hù)狀態(tài)，用戶(hù)可以編輯該列。2.2Modify()函數(shù)訪(fǎng)問(wèn)列屬性的語(yǔ)法格式如下：dw_controlname.Modify(stringmodstring)其中參數(shù)modstring是定義屬性的修改方式，即為“tect={‘integer’}或＃tect={‘integer’}”，integer代表列是否被保護(hù)的布爾值，為0即假時(shí)，列沒(méi)有被保護(hù)；為1即真時(shí)，列被保護(hù)。如用表達(dá)式指定protect屬性，該表達(dá)式有如下格式：defaultvalue~tDataWindowpainterexpression其中defaultvalue是能轉(zhuǎn)換為與該屬性適應(yīng)的數(shù)據(jù)類(lèi)型的值，即0或1，為一個(gè)缺省值；DataWindowpainterexpression是能使用任何DataWindow畫(huà)板函數(shù)的表達(dá)式，該表達(dá)式求值后的數(shù)據(jù)類(lèi)型必須與設(shè)置的屬性的數(shù)據(jù)類(lèi)型相匹配，當(dāng)設(shè)置某列的屬性時(shí)，該表達(dá)式作用于DataWindow中該列的每一行，這就使得可以根據(jù)數(shù)據(jù)的不同而改變保護(hù)的方式。3應(yīng)用實(shí)例下面以一個(gè)通訊錄中添加記錄為例詳細(xì)說(shuō)明。首先在數(shù)據(jù)庫(kù)中建立如表1所示的通訊錄表（Txlb），同時(shí)在表中輸入四條記錄。編號(hào)

姓名

工作單位

類(lèi)別0001

建國(guó)

湖南大學(xué)

同學(xué)0002

無(wú)名

廣西師大

同學(xué)0003

阿勇

廣西師大

同學(xué)0004

小崔

長(zhǎng)沙大學(xué)

同事表1通訊錄利用Txlb表建立數(shù)據(jù)窗口d_txl，數(shù)據(jù)源選擇QuickSelect，表現(xiàn)風(fēng)格選擇Grid。建立窗體w_txl，并在窗體中放置數(shù)據(jù)窗口控件dw_1，數(shù)據(jù)窗口控件dw_1連接的數(shù)據(jù)窗口即為d_txl，如圖1所示。在該窗體中，用戶(hù)如要防止刪除編號(hào)列中已有的編號(hào)而在新增記錄時(shí)又允許在該列輸入新編號(hào)，單擊數(shù)據(jù)窗口中的編號(hào)列標(biāo)題即可。然后單擊“新增”按鈕，此時(shí)編號(hào)列中已有的編號(hào)不可編輯，但對(duì)新增的一條記錄該列允許編輯，可以輸入新編號(hào)為0005的一條新記錄。記錄輸入完畢，單擊“確定修改”按鈕，輸入數(shù)據(jù)將存入數(shù)據(jù)庫(kù)，編號(hào)列中新增的記錄自動(dòng)轉(zhuǎn)為不可編輯，從而實(shí)現(xiàn)對(duì)新老數(shù)據(jù)實(shí)行不同的保護(hù)，這是用方法1）、2)都無(wú)法實(shí)現(xiàn)的；用戶(hù)如發(fā)現(xiàn)存入數(shù)據(jù)庫(kù)的編號(hào)有錯(cuò)誤，只要用鼠標(biāo)雙擊編號(hào)列標(biāo)題，即可解除列的保護(hù)狀態(tài)，重新編輯該列，從而靈活實(shí)現(xiàn)列的編輯要求。對(duì)數(shù)據(jù)窗口控件中的其它列也可以采用同樣的方法來(lái)實(shí)現(xiàn)新老數(shù)據(jù)的不同保護(hù)，因此這種方法還具有通用性。圖1通訊錄窗體w_txl界面具體實(shí)現(xiàn)代碼如下：.窗體w_txl的open事件dw_1.settransobject(sqlca)dw_1.retrieve().窗口中“確定修改”按鈕的clicked事件ifdw_1.update(dw_1，true，false)=1thendw_1.resetupdate()commitusingSQLCA;elserollbackusingSQLCA;messagebox(“錯(cuò)誤?。。　?，“數(shù)據(jù)保存失敗，請(qǐng)檢查輸入數(shù)據(jù)是否有錯(cuò)！”)endif.窗口中“新增”按鈕的clicked事件longrownumberrownumber=dw_1.insertrow(0)dw_1.setfocus()dw_1.scrolltorow(rownumber)dw_1.setcolumn(1).窗口中“退出”按鈕的clicked事件close(w_txl).窗體中數(shù)據(jù)窗口的clicked事件stringcolumntext

//列標(biāo)題stringcolumnname

//列名integerlength//列標(biāo)題長(zhǎng)度columntext=//獲得列標(biāo)length=len(columntext)//得到列標(biāo)題的長(zhǎng)度columnname=left(columntext，length-2)//取得列名ifnotisnull(columnname)then//判斷列名是否為空dw_1.modify(columnname+“.protect=‘1~tIf(isrownew()，0，1)’”)//根據(jù)該行是否新增決定相應(yīng)列的編輯特點(diǎn)，對(duì)新增行保護(hù)屬性為0，否則為1endif.窗體中數(shù)據(jù)窗口的doubleclicked事件stringcolumntext

stringcolumnnameintegerlengthcolumntext=length=len(columntext)columnname=left(columntext，length-2)ifnotisnull(columnname)thendw_1.modify(columnname+“.protect=0”)//恢復(fù)列的可編輯性endif4

結(jié)束語(yǔ)本文就PowerBuilder中用數(shù)據(jù)窗口的Protect屬性實(shí)現(xiàn)列不可編輯與解除列不可編輯的一種靈活方法進(jìn)行了詳細(xì)的分析，實(shí)際應(yīng)用表明，這種方法既具有靈活性，又具有通用性，是一種較好的方法。參考文獻(xiàn)[1]劉增進(jìn)編著.PowerBuild