BCB6 下的ListView 控件的标头排序问题
1 BCB6 下的ListView 控件的标头排序问题

比如一个类似这样的ListView项目

文件名称 文件大小 文件修改日期 ....
1
2
3 ...

想要实现的效果:
点击文件名称时候,ListView 按照文件名排序 从0-9,然后从A-Z结束.
点击文件大小时候,ListView 按照文件大小排序,从小到大
点文件修改日期时候,ListView 按照文件日期大小进行排序...

最好能给出代码,谢谢.

[解决办法]
以前的帖子，楼主试试
====================

也谈ListView的排序

--------------------------------------------

小弟看到jishiping兄弟发表了一篇关于ListView的简单排序方法的文章后，偶然查看BCB帮助，发现了另一中排序方法：
代码:
int ColumnToSort = 0;

void __fastcall TForm1::ListView1ColumnClick(TObject *Sender, TListColumn *Column)

{
ColumnToSort = Column-> Index;
((TCustomListView *)Sender)-> AlphaSort();
}

void __fastcall TForm1.ListView1Compare(TObject *Sender, TListItem *Item1, TListItem *Item2, int Data,
int &Compare)
{
if (ColumnToSort == 0)
Compare = CompareText(Item1-> Caption,Item2-> Caption);
else
{
int ix = ColumnToSort ?1;
Compare = CompareText(Item1-> SubItems[ix], Item2-> SubItems[ix]);
}
}

--------------------------------------------

两种方法其实是一样！