急，listview显示内容如何排序？

[loving]

listview显示内容（状态report）点击抬头（某一列）时如何处理才能按这个列排序？

[loving]

谢谢各位，谢谢：BaldZhang(BaldZhang)　

[Apollo47]

Listview.SortType:=....

[BaldZhang]

调用ListView的Sort方法，填入一个自定义的排序规则，就可以了

[loving]

to BaldZhang(BaldZhang):
高手，能否举个小例子？比如ColumnClick事件里？　

[BaldZhang]

function ListViewCompare(lParam1, lParam2, lParamSort: Integer): Integer stdcall;
begin
//lParam1是第一个Item，lParam2是第二个Item,
//内部用的是快速排序，系统会给你两个Item让你比较，
//比较的规则由你决定，我这里是简单的比较字符串。
Result := Comparetext(TListItem(lParam1).Text, TListItem(lParam2).Text);
end;

procedure TForm1.ListView1ColumnClick(Sender:TObject);
begin
Listview1.CustomSort(ListViewCompare, 0); //应该是CustomSort。
//不是上面说的Sort，记错了。
end;