自定义系统函数
在目标窗口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()
//完毕,使用于所有的窗口
//效果:单击一下,按升序,再单击,降序