查看: 8608|回复: 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- Q) G; I; I: t! R+ X( l. @
>Caption进行，与其它列不同，所以要单独进行排序。 % E' G, f. R k/ \0 C, Y
if (n==0) ! R1 ]8 x% Q* `
{ 
9 @+ m- Y6 Y0 p- n; u! Xfor(i=0;i< m-1;i++) / U. c/ h/ e f/ @' ]
for(j=i+1;j< m;j++) 
, n$ B4 f; d) mif(od) 
/ @+ t3 i- t4 }: B' @5 c6 A$ E{ 
* O+ l$ }8 h7 T1 |5 ^2 p7 Lif(ListView1- >Items- >Item- >Caption > 
 P9 I8 J% U K- s- aListView1- >Items- >Item[j]- >Caption) 
4 X' @" l/ B5 Z2 k{ 
, M% ^6 l6 I3 l3 E$ r, g( } k, E6 IListView1- >Items- >Item[m]= $ h. w& k- I" e- \; ~! [
ListView1- >Items- >Item; 
2 Z' Y) F7 [! b: b+ a* k8 aListView1- >Items- >Item= 
4 a2 `) o1 K f! fListView1- >Items- >Item[j]; 
- @8 o4 v+ k4 ?( `ListView1- >Items- >Item[j]= ' v# |0 K0 o6 N3 R9 |
ListView1- >Items- >Item[m]; 0 |$ l& U- @5 U6 P. I% ?* H9 f( y$ R
} 0 K% f7 B# z) R- _6 |! }5 i, p
} 7 h( g h& v) ?/ z. Q; z& r$ V6 i4 |
else 5 ~" k! \5 p/ L( ?
{ 
8 o2 t5 q& y8 W: K/ z. w" Z) j5 Bif(ListView1- >Items- >Item- >Caption< 
& b1 {( T" K; b, hListView1- >Items- >Item[j]- >Caption) ! {6 \3 S7 f, p9 S: d9 T( n
{ 
8 m: y" R1 h2 XListView1- >Items- >Item[m]= 
+ [0 N5 |: a2 M0 U1 h; P' CListView1- >Items- >Item; ; P) Q" U' i. [' B M$ K
ListView1- >Items- >Item= 1 o& v$ p; g0 V9 X: W2 S
ListView1- >Items- >Item[j]; 7 ?" L6 o$ x5 H
ListView1- >Items- >Item[j]= 
1 D% U4 y+ f T# _ListView1- >Items- >Item[m]; 1 {8 ]/ `! o/ {% @8 q$ k8 B
} 6 I E. R- v& c9 E$ k
} 
; w! M* i# j& Z* |" S( |3 ]+ OListView1- >Items- >Delete(m); ; |. Q5 }# b) D2 D6 B
return; 
3 k9 V7 @$ W( z; t! x7 h} & q( m% m5 y" ?( d
 - s- B, \! l4 {7 x- N; `
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- - u2 ?3 {1 ~8 u, c, C& a1 |
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 " P$ M1 i) E; B* @; N
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 8 X$ W4 S8 U% C8 y
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: - ?- _' G, e N
ListView1ColumnClick前面即可。 ' u! t: y; }2 L/ e! J
#include < vcl/dstring.h > & X4 ]" c" i* Z( ?. Q- Z
AnsiString __stdcall sg(AnsiString str,int n) / u" j" i6 n: m7 v
{ 2 u: y$ v/ W( M' }
int l,i; ' e$ D# v: q# q3 s& [
AnsiString qq(str); 
2 X) E t8 I9 i6 ]! Xl=qq.Length(); 6 E. Q: A) Q R( ?" t
AnsiString p(str); 
0 K3 U6 w. @) T- vchar a[]="\r\n"; 
) @8 w& m1 b! U* L" C9 bint j=0,k=0; 7 `9 ?% \+ D; G( M+ H3 O$ ?( O! L7 h% @
for(j=1;j< l;j++) 
6 h$ x( R/ q$ l$ [* m{ ( x; P3 ^+ b3 d( F, E
i=1; 
+ m+ N1 y5 w8 I" q& @# _while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
. n9 ^+ Z3 q& `6 U8 B{ 5 J( z: m1 A* r$ e2 x
p[i++]=qq[j]; + {8 ]3 H# Y7 r C; w
j++; - L- N5 n' o; o
} 
7 g/ O' c, \; j! E% A% [k++; 
( E y1 _1 K" aif((k-1)==n) & n H9 K2 E0 A4 v' o' b% G
break; 7 B- c5 h5 k' P# J" W/ J# C; [
} 
( x- p I% q- _( l3 _/ zp=NULL; 
* R: I$ _, g$ N; p8 Kreturn (p); 
2 `3 s9 K' ?+ e: W& }; q: d$ u} 4 U" n9 y5 F* o# v: M; d% @4 F
 
/ z, @4 I5 V- w+ t& T' @, Q6 j8 O---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- + t/ M( o& j' a
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
" w( a ?- U2 M可完成对此项目的点击排序功能。 ! ~) \6 f- I' L" q( m( o- F0 O4 U/ \
for(i=0;i< m-1;i++) : p# K! ?' i$ L. P a6 [0 X
for(j=i+1;j< m;j++) X& r0 b, X1 K% q: J
if(od) 
. `( S( @' T7 L$ h2 b7 ]{ E3 }' J1 ?4 T
if(sg(ListView1- >Items- > * N% j; w' t. f$ r
Item- >SubItems- >Text,n-1) > 2 h7 s% H5 }; K( @3 u: g; p6 `. L
sg(ListView1- >Items- > , ^; I( _- r7 k9 D
Item[j]- >SubItems- >Text,n-1)) 
+ b) d: f! ?/ `1 O2 ^2 V7 W: \) x2 G/ \/ m1 @
// ...以下从略 * H: x& n- c7 l! h9 r* M' [# g
 
/ p5 x* s$ v3 {. \最后，删除临时的交换项目。 5 x+ U) V+ G/ E& \- Y- _, Y" t
ListView1- >Items- >Delete(m); 
' o# U- d4 M% F6 v% ~( `$ C + O& U, x; v7 v t& A- Y$ a
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
 @* W7 U2 q- S# g% c1 w: ~式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
- | O3 w. y# {# E' N0 f