表格的数据刷新后会导致表格重建，直接在表中建立的点击事件只有第一次有效，之后就会丢失
使用疯狂的VFPER之点击表头排序https://bbs.bccn.net/thread-245879-1-1.html 不知道什么原因导致没有效果，
用下面的方法可用，但是添加到很多表单上就太麻烦了
表单添加方法myclick()：
INDEX on fieldname TO name
set order to name
thisform.grid1.refresh
刷新按钮：
=Bindevent(thisform.grid1.column1.header1,"Click",Thisform,"myclick")

请问一下 ，有没有方法扩展到所有字段，当然了能扩展到所有表单就更好了，谢谢！

当数据源被更新后，所有索引均已失效，必须重新建立索引才能达到你的目的。

谢谢提醒，又仔细查看了demo表单，不是索引的问题，而是忘了在表单的init事件中添加bind()，同时每次刷新前把数据源设为空，现在排序问题和扩展都解决了。
还有个小问题：顺序倒序的小三角图标不知道什么原因无法显示，改了绝对路径，把图片放到项目目录，在项目的其他文件中添加，放到vfp安装文件的根目录，类所在文件夹，到处都有图片，它就是显示不出来呢！
FILE(cFileName [, nFlags])
参数
cFileName
指定要查找的文件名。cFileName 必须包含文件扩展名。可以在文件名中包含路径以便搜索非当前目录或驱动器下的文件。如果文件名中没包含路径，Visual FoxPro 会在默认目录下搜索该文件。如果在默认目录下没找到该文件，Visual FoxPro 会沿着 SET PATH 确定的 Visual FoxPro 路径搜索。

我放的位置都应该被搜索过吧！可为什么就是不显示呢？难道也和表格被刷新有关系？

[此贴子已经被作者于2016-12-30 13:27编辑过]

是的

偶然发现编译后运行竟然是有图标的，搞不懂为什么测试运行时没效果

与路径设置是否有关系啊

应该没有关系吧，我又把设置都恢复回原来的了
file（"down.bmp"）
这应该就是默认路径吧，但是到处都有图片不知道是哪一处生效的，总之最后编译进程序中了

[此贴子已经被作者于2016-12-30 21:26编辑过]

图片保存在项目管理器中

找到一个类似的用GRID封装的文件名列表类，其中点击栏目排序的模块可以参考：
    PROCEDURE 点击表栏目排序
        LOCAL a表栏目[1], sz数据源, sz索引语句
        IF (AEVENTS(a表栏目, 0) > 0)
            IF (VARTYPE(a表栏目[1]) == "O") AND (PROPER(a表栏目[1].BaseClass) == "Header")
                sz索引语句 = "INDEX ON " + JUSTEXT(a表栏目[1].Parent.ControlSource) + " TAG 栏目 " + IIF(this.升序排列, "ASCENDING", "DESCENDING")
                sz数据源 = this.RecordSource
                this.RecordSource = ""
                SELECT 文件表
                ZAP
                APPEND FROM (DBF(sz数据源))
                SELECT (sz数据源)
                ZAP
                SELECT 文件表
                EXECSCRIPT(sz索引语句)
                SCAN
                    SCATTER MEMVAR
                    SELECT (sz数据源)
                    APPEND BLANK
                    GATHER MEMVAR
                ENDSCAN
                SELECT 文件表
                DELETE TAG ALL
                ZAP
                SELECT (sz数据源)
                GO TOP
                this.RecordSource = sz数据源
                this.SetFocus
                this.升序排列 = !this.升序排列
            ENDIF
        ENDIF
    ENDPROC

学习之中