查看: 8616|回复: 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- ' |/ N3 U1 g' J5 l
>Caption进行，与其它列不同，所以要单独进行排序。 
, _3 x+ z) g7 c# _9 ]! H$ Rif (n==0) / Z3 A1 w& s2 ?6 x7 A8 D
{ 
 t2 S: O' }7 P# Wfor(i=0;i< m-1;i++) 
8 x* k. Z! l: s1 O$ q5 ffor(j=i+1;j< m;j++) 
, S: I0 Y0 p' G- kif(od) , f1 l; `" z7 I; ]
{ 
& r" _3 ~( y; {, z. b% U8 Gif(ListView1- >Items- >Item- >Caption > 
: I' U8 V2 {2 aListView1- >Items- >Item[j]- >Caption) 
4 H& L1 r2 G+ z' O. Q{ 
1 q0 p) o" N7 R% x3 |+ C4 CListView1- >Items- >Item[m]= 
7 c5 ]' z( ^ B8 z4 YListView1- >Items- >Item; ]1 Y! |5 @* J5 B( r6 K+ H( i
ListView1- >Items- >Item= 
7 `2 {; r" a$ q4 H) D! K! XListView1- >Items- >Item[j]; 
, ]( [ n" o) gListView1- >Items- >Item[j]= * p' u! V8 O" q9 z. D
ListView1- >Items- >Item[m]; 5 X9 U6 O6 E4 L4 h# X
} 
5 ]1 Z4 j. q8 e9 ~- `; x2 l} 
7 N. @0 i! B% N0 [9 helse 
* X; q. T6 l( i6 z{ 8 h) B1 z, K1 z8 \
if(ListView1- >Items- >Item- >Caption< 
. x% \9 ?! Z* c: JListView1- >Items- >Item[j]- >Caption) . a T1 C0 g [7 M; P0 h8 j
{ 
8 H/ S- _5 ]' f. o7 GListView1- >Items- >Item[m]= 4 |) E3 N- H$ I' w) j6 K8 c
ListView1- >Items- >Item; ; U, A" o* B; h# F' k% G* d( \
ListView1- >Items- >Item= 3 K; [6 x1 P I3 ?, u2 j6 C
ListView1- >Items- >Item[j]; 
& ^& W) B0 M4 }8 k ]/ _ListView1- >Items- >Item[j]= {+ a4 e# J* T( t
ListView1- >Items- >Item[m]; ; J! R6 [0 Z0 j6 B
} 
% Y& m5 E5 j! x4 Z/ y$ t7 P" u6 ?} 3 w" [8 w2 n9 x3 }4 E2 z! \1 V
ListView1- >Items- >Delete(m); 
9 i' G! i7 V7 b* @return; 
+ O6 }' A) i, {# A" {} 
4 a L$ W3 B, a1 R( G; w( G6 H 
% F, D; Q6 j& x2 D9 h2 Q---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
) i: {! Y) B2 C2 ~- ]2 o>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
 z3 @8 p1 b `3 g3 I式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 % w: _& y/ S9 l. z" A
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 2 r u1 x0 a6 A9 K7 Q( o3 l) E
ListView1ColumnClick前面即可。 
: z/ Y" n+ B6 s( X#include < vcl/dstring.h > : E, J1 o6 e" u' g( ]6 J& g6 A4 H( E+ J
AnsiString __stdcall sg(AnsiString str,int n) $ j. ^) e7 B; r/ ^2 b
{ 8 Y9 Z2 C0 o" S; W8 L. b
int l,i; 
& r+ D! m/ C' X4 @* OAnsiString qq(str); ! ~( X- V8 U# ^/ N
l=qq.Length(); 
( G: C# c K5 U0 _ S. OAnsiString p(str); # i/ t4 d( p- I! Z3 V3 T
char a[]="\r\n"; 3 F x; R8 B2 I+ f# t; M7 r
int j=0,k=0; 
/ B7 ]+ \1 @1 q: i% I3 e$ Sfor(j=1;j< l;j++) $ j3 Q0 T) R( f* n2 m% K
{ 0 U( f& e* W1 |4 l6 ~( E6 J
i=1; , v' ?5 G# _3 ^. L, v
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
$ @7 y+ f4 `0 y9 ]{ 
9 ^8 A2 P+ H5 J; n! y) J# W; s4 tp[i++]=qq[j]; 
) C) { \) _5 n7 S5 Rj++; ; x7 W2 F6 v, F2 ]0 |$ Y
} $ W$ P" _8 h1 v; Q0 k1 Y
k++; ' e9 {7 T4 H% V* V
if((k-1)==n) 8 n7 ?* r+ q& Q: }6 E$ W1 m3 f
break; % a4 g9 v9 _0 h
} 
0 ~4 U, A! k" z& e- }' ^p=NULL; 
' O( N( D* [0 o3 f7 |# U. mreturn (p); 
* v0 f) r* I( _3 |( G8 N} 
' z- E. u' ?$ C% r& g5 ? 
) I6 d5 f4 o! P, t, s---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
5 v3 X0 _, r8 I, i C>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
& D7 B- l+ o, k1 s可完成对此项目的点击排序功能。 
- ?7 V& U1 V5 q- t# p6 w* m. T9 B) tfor(i=0;i< m-1;i++) 
- T/ O5 \! F! _7 _5 g/ efor(j=i+1;j< m;j++) 
8 [2 {! H( D! l- @5 |, aif(od) " F! K" ?( j$ ^9 H: w, O% A$ Z* j
{ : q% P' [0 P9 x. l- r' G
if(sg(ListView1- >Items- > 
3 `8 \! K" n) C' yItem- >SubItems- >Text,n-1) > 5 U8 R9 X6 K" V! d
sg(ListView1- >Items- > 
8 d r5 a% I7 |1 n' O; p% qItem[j]- >SubItems- >Text,n-1)) 
/ X' A1 d% d& k3 B" f, `' j& f3 V2 A
// ...以下从略 
; ]8 V; `2 v6 C4 ~/ n( S$ q 2 G/ j+ j1 @4 I7 d- ~0 o
最后，删除临时的交换项目。 8 |5 l+ a* G: }% c7 w, `
ListView1- >Items- >Delete(m); / C1 C0 y' l( n' C; C" Y. P
 
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
4 f; l) H' ~) A& Q6 ` E式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 4 F- f1 H: ?0 D2 c