PowerBuilder數據窗口編程技巧十則

PowerBuilder數據窗口編程技巧十則


蔡偉龍
01-6-25 下午 05:40:23


PowerBuilder取得巨大成就的原因就是有Datawindow對象,DataWindow是具有功能強大和靈活多變的特點,本人用PowerBuilder開發過一段時間後,,總結出一些技巧,以供廣大的PB開發者借鑑使用。
一.如何創建一個報表,如下形式
Quantity Running Total
5,000 5,000
2,500 7,500
3,000 10,500
12,000 22,500
對於Running Total列,我們可使用計算列:CumulativeSum(Quantity for all),即可達到逐漸遞增求和的功能。
二.數據窗口的數據送緩衝區之前確認的四個步驟判斷數據類型是否正確。如不正確則觸發ItemError事件。判斷數據是否符合有效性規則。如不符合有效性規則,同樣觸發ItemError事件。 判斷是否有數據被改動。判斷數據是否通過ItemChanged事件,如果數據和ItemChanged相斥,將觸發ItemError事件。
三.如何在DataWindow中用數據類型爲Datetime的列爲條件進行查找
1.當要查找的日期條件是一常數時使用如下表達式:
ls_Find = "datetime_col
= DateTime ('1/1/1999')"
2.當要查找的日期條件是一個變量時使用如下的表達式:
ls_Find = "datetime_col = DateTime ('" + ls_Date + "')"
3.當要查找的日期條件是一個DateTime數據類型時使用如下表達式:
ls_Find = "datetime_col = DateTime ('" + String (ldt_DateTime) + "')"
四.設置數據窗口Boolean型屬性的三種方法
PowerBuilder提供了三種方法設置數據窗口的布爾型屬性,分別是True/False, 1/0, 'Yes'/'No'。例如:
dw_1.Object.address.Visible = 0 dw_1.Object.address.Visible = False dw_1.Object.address.Visible = 'No'
PowerBuilder在處理上以字符串的形式保存屬性,而不考慮屬性值是布爾型、長整型或是字符型。爲了進一步理解,可以導出一個數據窗口並查看它的原碼,可以發現即使是列的顏色屬性它也是使用帶雙引號的數字來表達。
五.如何在DataWindow中快速刪除多行
在開發過程中可能經常有要進行多行刪除的操作,一般都使用循環語句進行操作:
FOR ll_RowOn = 1 TO dw_1.RowCount() dw_1.DeleteRow(ll_RowOn) NEXT
一個快速的刪除方法是把要刪除的行從主緩衝區中移到刪除緩衝區中。例如,刪除緩衝區中所有的行:
dw_1.RowsMove(dw_1, 1, dw_1.RowCount, Primary!, dw_1, 1, Delete!)
不過不要忘了過濾的行在不同的緩衝區中。
六.如何在DataWindow的SQL語法中不使用SELECT DISTINCT實現刪除重複的行
起先對你要顯示唯一值的列進行排序:"city A",然後增加如下過濾字符串:" city < > city [-1] or GetRow () = 1"
七.如何在分組形式的DataWindow中分別顯示各組的行號
當我們爲Datawindow的每一行顯示行號時,可以簡單的放一個表達式爲GetRow()計算列。但是對於分組的Datawindow,要分別顯示各組的行號,則應使用表達式爲GetRow() - First(GetRow() for Group 1) + 1的計算列。
八.如何改變列的字體顏色,提醒用戶此列已做修改
在列的Color屬性中,輸入如下表達式
IF (column_name < >column_name.Original, RGB(255, 0, 0), RGB(0, 0, 0))。
在這個條件中,如果此列已改變,則顯示紅色字體,否則顯示黑色字體。這個表達式主要用column_name < > column_name.Original比較當前列的值和原始列的值是否相同來達到判斷的目的。
九.在數據窗口中移走行,但不是去做過濾或刪除操作
RowsDiscard()函數可做到這一點,它在數據窗口中執行移除工作,但被移走的行它不可被刪除或做任何修改性的保存。
十.如何在多行顯示的DataWindow 中的Footer Band中顯示當前數據的首行和最後行的行號
我們先看兩個計算列的表達式:
IF (GetRow() = First(GetRow() FOR Page), 1, 0) // 1 爲當前頁的第一行
IF (GetRow() < > 1 AND GetRow() = Last(GetRow() FOR Page), 1, 0) // 1 爲當前頁的最後一行
由上面可知,在Footer Band中設置如下計算列表達式:
'Rows ' + String(First(GetRow() FOR Page)) + ' to ' + String(Last(GetRow() FOR Page)) + ' are displayed'。
即可達到這項功能。
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章