原因就是有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)即可达到逐渐递增求和功能2．数据窗口
数据送缓冲区的前确认 4个步骤 判断数据类型是否正确如不正确则触发ItemError事件判断数据是否符合有效性规则如不符合有效性规则同样触发ItemError事件 判断是否有数据被改动判断数据是否通过ItemChanged事件如果数据和ItemChanged相斥将触发ItemError事件3．如何在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) + "')" 4．设置数据窗口Boolean型属性 3种思路方法PowerBuilder提供了 3种思路方法设置数据窗口
布尔型属性分别是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在处理上以
串形式保存属性而不考虑属性值是布尔型、长整型或是型为了进
步理解可以导出个数据窗口并查看它原码可以发现即使是列颜色属性它也是使用带双引号
数字来表达5．如何在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!) 不过不要忘了过滤行在区别缓冲区中6．如何在DataWindow
SQL语法中不使用SELECT DISTINCT实现删除重复行起先对你要显示唯
值列进行排序:"city A"然后增加如下过滤串:" city < > city [-1] or GetRow = 1"7．如何在分组形式
DataWindow中分别显示各组行号当我们为Datawindow
每行显示行号时可以简单放个表达式为GetRow计算列但是对于分组Datawindow要分别显示各组行号则应使用表达式为GetRow - First(GetRow for Group 1) + 1计算列8．如何改变列
字体颜色提醒用户此列已做修改在列
Color属性中输入如下表达式IF (column_name < >column_name.Original, RGB(255, 0, 0), RGB(0, 0, 0)) 在这个条件中如果此列已改变则显示红色字体否则显示黑色字体这个表达式主要用column_name < > column_name.Original比较当前列值和原始列值是否相同来达到判断目9．在数据窗口中移走行,但不是去做过滤或删除操作
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' 即可达到这项功能
最新评论