查看: 8980|回复: 0

在C++Builder中实现ListView的列标头点击排序功能

字体大小: 正常放大

韩冰

823 主题	3 听众	4048 积分

我的地盘我做主

该用户从未签到

电梯直达

1^#

发表于 2005-1-26 12:28 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

<

> 
<

>天津大学电子与信息工程学院 
<

>宋天宁 
<

>---- 列表框控件在应用程序中的使用率很高，在Ｗｉｎｄｏｗｓ中经常见到， 
<

>它有四种常见的式样，分别具有显示大图标,小目标，含有图标的多列列表，含 
<

>有列标头的列表。我们也经常见到一些扩展功能，例如我们在资源管理器中的文 
<

>件列表框中，在选用详细资料察看时，用鼠标单击列标头,如大小，则所列文件 
<

>按大小排序;单机日期，则按文件日期进行排序.这一功能增强了应用程序的可用 
<

>性，使操作更直观、方便。笔者在以Borland C++Builder 3.0(以下简称BCB）作 
<

>为开发平台实现这一功能时发现，仅通过设定列表框控件的属性值的方法，只能 
<

>根据项目的首列加以排序，不能根据子项目(SubItems)排序。因此，我们需要编 
<

>写自己的代码以完成这一功能。 
<

> 
<

>---- 以下描述如何在BCB开发平台上为列表框添加列标头点击排序功能，当我们 
<

>点击的次数为奇数时，所列内容以降序排列;当我们点击的次数为偶数时，所列 
<

>内容以升序排列。 
<

> 
<

>---- 首先将一个列表框控件安放在Form上，并将其名称设为ListView1。然后在 
<

>其中添加若干项目作为试验对象。方法为：用鼠标右键单击控件，在弹出的对话 
<

>框中选择Columns Editor用来添加列和子列;再选Items Editor用来添加项目（ 
<

>包含子列和主列上的内容）。 
<

> 
<

>---- 为了显示出子项目内容，需要在Object Inspector中修改ListView属性值 
<

>，将ViewStyle设置为vsReport。另外，还必须将SortType设置为None，以使我 
<

>们的排序程序起作用。这样，程序的外观已经符合需要，下面应该增加排序功能 
<

>的代码了。为此需要添加类的方法到源代码中。添加位置为： 
<

> 
<

>void __fastcall TForm1:

istView1ColumnClick 
(TObject *Sender, 
TListColumn *Column) 
 
---- 在该方法的传递参数中，指向TListColumn类型的指针Column中含有用户所 
点击的列的信息。 
---- 下面先定义变量： 
 
int i,m,n,j; 
static bool od=true; 
od=!od; 
 
---- od代表用户点击的次数，奇数时为true,偶数时为false。注意此处od的存 
储类型设定为static,可以保证其数值的连续性。用n记录用户点击的列号,m记录 
列表框中的总项目数。 
n=Column- >Index; 
m=ListView1- >Items- >Count; 
 
---- 在列表框中临时添加一个项目作为排序中交换用的临时空间。 
ListView1- >Items- >Add(); 
 
---- 当用户点击第一列列标头时，排序按ListView1- >Items- >Item- ( e2 V. V5 c8 Q: S( o. Z" }
>Caption进行，与其它列不同，所以要单独进行排序。 + D9 g, K4 I3 s0 g+ }7 o
if (n==0) ) ^) F* d/ K3 u6 D" M' H
{ 
' W2 [1 h; s; W9 Z' t$ |5 B* Pfor(i=0;i< m-1;i++) ) V/ B& c+ ]$ t; ~
for(j=i+1;j< m;j++) " |0 o0 S7 G7 C9 @) E
if(od) ; X' s$ T e% s( M% S5 \5 k
{ 
) C4 e; s2 X2 e/ ^if(ListView1- >Items- >Item- >Caption > 
# U1 l+ c$ q( o5 K+ v$ Z `/ YListView1- >Items- >Item[j]- >Caption) 8 i$ l) r/ M- U3 @( U% Q
{ 
! Z. U9 G0 d3 T0 q0 O# B1 jListView1- >Items- >Item[m]= 8 Y8 s! T4 `! z$ p- C
ListView1- >Items- >Item; 8 y' J& F7 |" h/ C* }( K
ListView1- >Items- >Item= 
$ R. P& N" }8 |3 d, N2 hListView1- >Items- >Item[j]; 
# W$ m: n& q6 C- j! h- nListView1- >Items- >Item[j]= , M M! r& \. v! C6 |5 C/ B
ListView1- >Items- >Item[m]; 
, L9 ]! ]; }, p( Y# \} 
0 \) C7 H+ D; p7 ~1 a} 
3 F- V2 a8 F9 k4 e( {else " W2 e1 E2 j+ B7 S, J# H6 M, K
{ 
; f# `1 K! R2 {0 sif(ListView1- >Items- >Item- >Caption< 
/ Q9 k2 g% X- M( E8 |( W bListView1- >Items- >Item[j]- >Caption) 
) p. V; Q# M( H( T& L6 G{ 
: a; R$ O- w, e. U; bListView1- >Items- >Item[m]= 6 i' e% k3 T* `! D
ListView1- >Items- >Item; ( l( P% _' U! _+ F% ?$ [
ListView1- >Items- >Item= 
) {; A; g; {1 R6 u$ {1 j1 e5 A% iListView1- >Items- >Item[j]; , k% d3 U3 H3 r! q
ListView1- >Items- >Item[j]= 
8 W* s7 [2 n( I, b( {ListView1- >Items- >Item[m]; ; L/ o- \: j$ ^9 N; g
} 
7 r$ E% ~& s$ L} 
" K) o( H( R. b! MListView1- >Items- >Delete(m); 
$ J; C" @' [* ~5 C/ \& wreturn; 6 j$ d3 V! G7 I/ ]! [/ R+ F
} 1 L7 l" r( x& M3 a4 h3 R8 T
 0 V. D; o, ~8 h
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- % Z1 [7 a9 s8 {# A7 E8 L( F8 A% q
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
, ]2 H0 L- ^( { L J3 r6 ~* M# S式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 : o$ p: l. D! b
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
2 p3 U8 P" @8 n; h5 {, E+ ]ListView1ColumnClick前面即可。 ; ~" Y6 W, R7 J& x L8 ~
#include < vcl/dstring.h > 
0 j& l. M3 k% m# n+ `3 ~AnsiString __stdcall sg(AnsiString str,int n) - S1 M# M; r( k- B
{ 
/ l% @* J: ~; eint l,i; 1 f- p) y1 d6 F" Z
AnsiString qq(str); 
' Y F1 O2 A1 ^2 F* I# i8 ]l=qq.Length(); 
7 m7 a* @% C% r6 L1 D% VAnsiString p(str); 
) d: R+ J( Q' w1 K7 q8 _9 h/ cchar a[]="\r\n"; + g% g$ w& c" T3 z) Y
int j=0,k=0; : M, y" `) h; G2 Y; l: Z6 N4 h
for(j=1;j< l;j++) ; O$ c+ ~" s+ o6 r& B1 J) q" q
{ 6 k! d9 k1 R% D
i=1; $ X$ A' O, i% |# h
while(qq[j]!=a[0] && qq[j+1]!=a[1]) # C- `2 c/ y8 j D; T. B7 K
{ % v, X" K! s6 Z2 n
p[i++]=qq[j]; 
) _' m; Q: s9 p' v, Rj++; ( X& R! Q5 e/ ~9 r) ?
} 
# ?8 C' E _8 o3 T8 E+ B ?1 Ek++; 
2 M0 h2 i" U6 g7 \& v# ]/ {if((k-1)==n) Z7 D* ^8 e# E, J/ V
break; 
, p- u! V- h7 c- R, m' s: F! i} 
* E, l, p# ~$ V: {% gp=NULL; 0 p. n* ~) @9 H0 X: O
return (p); 
, w4 h$ a C- d! {; P6 y} 
$ }; @8 { j$ t. i% v* k/ F' @ 
4 T( v1 ?, `& n T6 e---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- + h2 }4 e9 f' S$ N7 M9 [4 n9 ]# a* J$ F6 H
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 / O( ]! Y. t( D! y( P3 T! V& L
可完成对此项目的点击排序功能。 + m8 G! w. _/ a$ {! P2 w' i$ [$ `' }
for(i=0;i< m-1;i++) 
7 p" ]5 P6 W/ z& x4 L5 s5 {1 H- zfor(j=i+1;j< m;j++) / v& R" h F6 p
if(od) 
, ?. J3 |" M$ P2 P! Q- O% \7 e{ 
3 u2 l8 P; `- a6 b, Vif(sg(ListView1- >Items- > 
( Z' Q+ y% N2 l7 [! j2 E7 [Item- >SubItems- >Text,n-1) > ' r) g* v. H$ n( }. U6 i+ e5 Y
sg(ListView1- >Items- > 7 V$ Y" V8 {; K/ L
Item[j]- >SubItems- >Text,n-1)) 
 k2 s9 Q- | x$ ~/ @6 j
; f& n: \( b- ]/ @* `7 ^/ T1 P// ...以下从略 
6 w' p! I s ?1 r. L 
/ Q$ E2 m$ |, k* [最后，删除临时的交换项目。 
- Q. Q+ P p' a. D& qListView1- >Items- >Delete(m); 
+ ~+ R5 k" E! j* P+ | 
7 B! C4 Z' W- ]8 i2 F$ `---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 5 c0 Q7 N/ _0 Z( O6 A) E
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 % Y# D0 K) v1 f4 `