PB实现数据窗口动态排序的方法

　　在PowerBuilder中使用数据窗口检索到的数据往往是无序的，虽然可以通过设置Select语句实现排序的功能，但是数据窗口一旦生成都无法进行动态调整。笔者总结了在已经生成的数据窗口中实现动态排序的三种方法,现介绍给大家。

　　一、 准备工作

　　设计如图1所示的示例窗口。为了更好地比较三种不同的方法，dw—1中的数据来自两个表student和class。student表中包含四个字段sid(学号)、sname(姓名)、saddr(住址)和cid(班号)，class表中包含两个字段cid(班号)和cname(班级名称)。

图1

　　二、三种方法的源程序

　　三种方法中的“执行”按钮的代码分别为：

　　方法1：用SetSQLselect()

string ls—oldsql,ls—newsql,ls—order ls—column 　　ls—oldsql=dw—1.getsqlselect() 　　choose case ddlb—1.text 　　case ″学号″ls—column=″sid″ 　　case ″姓名″ls—column=″sname″ 　　case ″住址″ls—column=″saddr″ 　　case ″班号″ls—column=″class.cid″ 　　case ″班级名称″ ls—column=″cname″ 　　end choose 　　if rb—1.checked then ls—order=″ASC″ 　　else ls—order=″DESC″ 　　end if 　　ls—newsql=ls—oldsql＋″ ORDER BY ″＋ ＆ 　　ls—column＋″ ″＋ls—order 　　if dw—1.setsqlselect(ls—newsql)=－1 then 　　messagebox(″警告″,″数据设置失败″,stopsign!) 　　else dw—1.settransobject(sqlca) 　　dw—1.reset() 　　dw—1.retrieve() 　　dw—1.setsqlselect(ls—oldsql) 　　end if

　　方法2：用describe()和modify()

string ls—mod, ls—order,ls—old,ls—column 　　ls—old=dw—1.describe(′datawindow.table.select′) 　　dw—1.settransobject(sqlca)