Vb教程   Vb.net教程   Vfp教程   C/C++教程   Vc/Vc++教程   Delphi教程   Java教程   Powerbuilder
  杀毒频道 | 短信频道 | 网络电视 | 论文中心 | 教你学上网 | 教你学软件 | 网页特效 | 电脑基础 | 论坛  
  计算机等级 | 程序员考试 | 英语四六级 | 职称英语 | 司法考试 | 报关员考试 | 公务员考试 | 翻译员考试 | 注册会计师  
  Html教程 | Css教程 | Xml教程 | Asp教程 | Asp.net | Php教程 | Jsp教程 | Linux教程 | QQ技巧  
Photoshop Illustrator ImageReady Maya教程 3D Max教程 Lightscape Coredraw教程 Authorware Autocad教程 Freehand教程
Access教程 Mysql教程 Sql server Oracle教程 Word教程 Excel教程 Powerpoint Frontpage Asp.net源码 Php源代码
Flash教程 Fireworks Dreamweaver C#教程 outlook教程 系统安装 vbscript教程 Javascript Jsp源代码 Asp源代码
您的位置:首页 >> Powerbuilder教程 >> 正文

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)
   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—mod=″datawindow.table.select=′ ″+ls—old+&
   ′ORDER BY ″ ′+ls—column+′ ″ ′+ls—order+″ ′ ″
   dw—1.modify(ls—mod)
   dw—1.retrieve()
   dw—1.modify(″datawindow.table.select= &
   ′ ″+ls—old+″ ′ ″) 

   方法3:
   用setsort()和sort()
   string ls—sort,ls—order,ls—column
   choose case ddlb—1.text
   case ″学号″ ls—column=″#1″
   case ″姓名″ ls—column=″#2″
   case ″住址″ ls—column=″#3″
   case ″班号″ ls—column=″#4″
   case ″班级名称″ ls—column=″#5″
   end choose
   if rb—1.checked then ls—order=″A″
   else ls—order=″D″
   end if
   ls—sort=ls—column+′′+ls—order
   dw—1.setsort(ls—sort)
   dw—1.sort() 

三、三种方法的比较

   1.第一种和第二种方法要求数据窗口在生成时是无序的,第三种方法无此要求。

   2.对于来自不同表单的相同的列名(如student.cid、class.cid)用第二种方法排序实现起来较麻烦,因为在用modify()函数时要特别注意引号的使用。但是第二种方法比第一种方法的执行速度要快。

   3.第三种方法使用起来最方便,既可以引用列名也可引用列号(如#4表示第四列)来指定序列。

[返回]

     

首页 | 设为首页 | 加入收藏 | 关于本站 | 友情链接 | 版权声明

     
 
Copyright© www.bianceng.cn Powered by 编程入门网 All Rights Reserved
吉ICP备06005558号