点击标题条对数据窗口排序

转载 2007年09月14日 17:12:00

********************************
*
* 目的:和windows explorer一样,点击数据窗口的标题 header ,对数据窗口进行排序 
*

* 要求: 列的header 必须伪列名加 '_t'
*
* 如:
* Column Name : 'emp_id'
* Column Header : 'emp_id_t'
*
* 每次只能对一个列排序: 
*
*************************************/
 //数据窗口的clicked 时间:
String ls_old_sort, ls_column
Char lc_sort
/* Check whether the user clicks on the column header */
IF Right(dwo.Name,2) = '_t' THEN

ls_column = LEFT(dwo.Name, LEN(String(dwo.Name)) - 2)

/* Get old sort, if any. */

ls_old_sort = dw_1.Describe("Datawindow.Table.sort")

/* Check whether previously sorted column and currently clicked
column are same or not. If both are same then check for the sort
order of previously sorted column (A - Asc, D - Des) and change it.
If both are not same then simply sort it by Ascending order. */

IF ls_column = LEFT(ls_old_sort, LEN(ls_old_sort) - 2) THEN
   lc_sort = RIGHT(ls_old_sort, 1)
      IF lc_sort = 'A' THEN
         lc_sort = 'D'
      ELSE
         lc_sort = 'A'
      END IF
   dw_1.SetSort(ls_column+" "+lc_sort)
ELSE
   dw_1.SetSort(ls_column+" A")
END IF
dw_1.Sort()
END IF

 

相关文章推荐

windows应用开发由浅入深(三)有关鼠标事件--设置鼠标点击测试值实现非标题栏拖动窗口

相关消息:WM_NCHITTEST MSDN描述:The WM_NCHITTEST message is sent to a window when the cursor moves, or whe...

数据窗口单击标题栏自动进行排序,并显示升降序/拖动行可以改变行顺序

这是一个PB9写的数据窗口单击标题自动排序的标准datawindow对象forward global type uo_datawindow from datawindow end type end f...

Asp.Net GridView點擊標題排序方法

Asp.Net GridView點擊標題排序方法 今天需要用到在GridView中點擊標題排序,琢磨了半天,終於成功了。在看代碼之前需要說明一點:       GridView本身有一个Sor...

JS点击标题自动排序

站长特效 js实现点击分类排序效果 站长特效网  * {   padding:0;   margin:0;  }  body {   font-family:verdana;   f...

点击修改按钮,将数据显示在弹层窗口中,利用ajax实现

最近要做的这个东西,挺费事的,其实我也是菜鸟,可是工作分给你了,哭着也要做完,然后就这么哭着开始做了。废话不说了,开始说项目: 首先这是一个这种效果的东西,点击“修改”弹出一个窗口,窗口中顺带着你刚...

点击图标实现table数据的排序

我们在很多时候会用到对数据的排序,但是如果当点击图标后从数据库来重新排序的话,当数据量过大的时候会给数据库很大的压力。所以使用tablesort来更新排序。首先导入jquery.tablesorter...

Winform中DataGridView绑定List<T>数据源时,点击DataGridView列头不能自动排序解决方法

*********************************************方法一********************************************* 自定义...

点击弹出框,实现可以搜索的ListView排序数据

使用EditText+ListView并结合TextWatcher实现输入关键字筛选数据 想必大家应该遇到过这样的情况,当点击Spinner控件后弹出的列表内容超多,一个一个滑动着去寻找所要的项很麻...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)