真懒啊!!!
在listview的onColumnclick里写alphaSort
具体看帮助

解决方案 »

  1.   

    呵呵,这几位老兄都是题目不看清楚就回答,不是对Items排序,而是通过程序改变Cloumns的排列顺序。
      

  2.   

    呵呵,还是我自己找到了答案
    procedure MoveColumn(ListView: TListView; OldIndex, NewIndex: Integer);
    begin
      Listview1.Columns[OldIndex].Index := NewIndex;
    end;
    但是有几个问题,我开始就想到了这个办法,但是我将这个函数的调用放在了FormCreate事件中执行(图方便),结果是不产生效果,经反复调试,发现如果是Listview中已经有了Item就可以成功(哪怕是窗体以创建以后马上删掉这些Item,再调用那个函数),如果反复执行三遍可以解决问题(实际上两遍就可以了,我想之所以执行第三遍,是因为第一遍的效果和第二遍抵销了),还有就是,如果不是在FormCreate事件中执行,一遍就行了。
    谁能知道是为什么?
      

  3.   

    因为Create是个很怪的事件,它是在你还没Show这个窗体之前就已经执行了
    建议使用activate事件