PB中实现数据窗口动态排序的三种方法.net -电脑资料

电脑资料 时间:2019-01-01 我要投稿
【www.unjs.com - 电脑资料】

    在PowerBuilder中使用数据窗口检索到的数据往往是无序的,虽然可以通过设置Select语句实现排序的功能,但是数据窗口一旦生成都无法进行动态调整,

PB中实现数据窗口动态排序的三种方法.net

。 一、 准备工作 设计如图1所示的示例窗口。为了更好地比较三种不同的方法,dw—1中的数据来自两个表student和c

    在PowerBuilder中使用数据窗口检索到的数据往往是无序的,虽然可以通过设置Select语句实现排序的功能,但是数据窗口一旦生成都无法进行动态调整。

    一、 准备工作

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

    javascript.:if(this.width>498)this.style.width=498;' nmousewheel = 'javascript.:return big(this)' height=183 src="/files/uploadimg/20050921/1444070.jpg" width=200>

    图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.第一种和第二种方法要求数据窗口在生成时是无序的,第三种方法无此要求,

电脑资料

PB中实现数据窗口动态排序的三种方法.net》(https://www.unjs.com)。

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

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

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

最新文章