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

发表于:2007-06-07来源:作者:点击数: 标签:
在PowerBuilder中使用数据窗口检索到的数据往往是无序的,虽然可以通过设置Select语句实现排序的功能,但是数据窗口一旦生成都无法进行动态调整。笔者总结了在已经生成的数据窗口中实现动态排序的三种方法,现介绍给大家。 一、 准备工作 设计如图1所示的示例

  在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)

 



原文转自:http://www.ltesting.net