排序问题？ - 编程论坛

#2

ucandoit10102008-09-07 22:42

[bo][un]zhanjb[/un] 在 2008-8-29 02:30 的发言：[/bo]

如何控制在Retrieve（）出来的的DW窗口中，点击其中任意一个HEADER NAME，就按它来排序，鼠标点击它一下，就做升或降排序……
请各位多多指教！

在 header 的地方，DW裡或外都可，放個COMMAND BUTTON ，代碼如下 :

dw_main.SetSort(column name)

dw_main.Sort( )

[[it] 本帖最后由 ucandoit1010 于 2008-9-7 22:47 编辑 [/it]]

#3

XTPB2008-11-02 16:48

自定义系统函数

在目标窗口dw_main的"header"位置,clicked事件,调用自己定义的通用系统函数,设置全局变量
gl_clicked= 0

//clicked()
gl_clicked ++
f_winsort(dw_main)

//f_winsort(dw_main)
函数主要内容: 窗口 dw_main
string ls_colname0
ls_colname0= dw_main.GetoObjectaAtPointer()
ls_colname= left(ls_colname0, pos(ls_colname0,'_t') - 1)

if len(trim(ls_colname))<=0 then return

if mod(gl_clicked,2)=0 then
dw_main.SetSort(ls_colname + " A")
else
dw_main.SetSort(ls_colname + " D")
end if
dw_main.Sort()

//完毕,使用于所有的窗口
//效果:单击一下,按升序,再单击,降序

#4

大湖2012-02-11 23:10

pfc里面有现成的