ListView点击头排序

int sort=0;
bool column[20];
//   全局变量定义

//------------------------------------------------------------------

void __fastcall TForm1::ListView1Compare(TObject *Sender, TListItem *Item1, TListItem *Item2, int Data, int &Compare)
{
if (column[sort]==true)
     {
      if (sort==0)
          Compare=CompareText(Item1->Caption,Item2->Caption);
      else
          Compare=CompareText(Item1->SubItems->Strings[sort-1],Item2->SubItems->Strings[sort-1]);
     }
else
     {
      if (sort==0)
          Compare=CompareText(Item2->Caption,Item1->Caption);
      else
          Compare=CompareText(Item2->SubItems->Strings[sort-1],Item1->SubItems->Strings[sort-1]);
     }
}

//------------------------------------------------------------------

void __fastcall TForm1::ListView1ColumnClick(TObject *Sender,
       TListColumn *Column)
{
   sort=Column->Index;
   ((TCustomListView *)Sender)->AlphaSort();
   if (column[sort]==false) column[sort]=true;
   else column[sort]=false;
}
//------------------------------------------------------------------


ListView_SortItems 具体使用在MSDN中自已看,这只是一个宏定义
其实它就是一个SendMessage(hwnd, LVM_SORTITEMS, lParamSort, pfnCompare)
三句代码搞你。这是最简单最快的。

你可能感兴趣的:(BCB,Delphi)