查看: 8408|回复: 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- 
7 |: y7 f8 ]) b: t( o>Caption进行，与其它列不同，所以要单独进行排序。 
 c# A! ^& h, hif (n==0) 
, R% {7 b) w+ }, N, G5 L{ 6 a: a$ W) M" x
for(i=0;i< m-1;i++) 
$ h9 J( u- k' t! K7 j& `, i9 y$ Zfor(j=i+1;j< m;j++) 
) m& T: x+ }" b' gif(od) 
) _8 J# R* G$ C{ 0 A% `; g( s! M5 |$ f* [2 ~
if(ListView1- >Items- >Item- >Caption > 
/ x: d1 r: M( zListView1- >Items- >Item[j]- >Caption) 9 m S/ {& D; |
{ 
) O9 N$ [5 m% m6 O7 Z" E: SListView1- >Items- >Item[m]= 
" k8 U" L- N% t0 Z, z+ \: GListView1- >Items- >Item; 
& N* O8 u, { N" M/ D0 tListView1- >Items- >Item= ) z k5 i/ k0 E/ }4 I: j
ListView1- >Items- >Item[j]; 3 b9 G1 C* H" Q2 l& [
ListView1- >Items- >Item[j]= 
 e3 w$ H* c& I- f8 t; j* uListView1- >Items- >Item[m]; " l; X6 Y4 F9 @$ h% i2 j% M# y5 n
} 7 O6 B$ |! u- h. e$ P- |& P
} 
& h# m+ S* G" C) }: n' j7 i1 N; ^else ( v' E6 S# o9 M/ U$ a9 A1 e
{ 
1 V, O3 }' S. R: n1 L, cif(ListView1- >Items- >Item- >Caption< 
1 I. V( T" l! N. r% g) ~ListView1- >Items- >Item[j]- >Caption) $ t V+ N9 {' r! }
{ ( _+ W3 r0 L2 R4 ^
ListView1- >Items- >Item[m]= 
6 Z- e; p# ^5 E* I& g+ {9 @) XListView1- >Items- >Item; 3 u/ k5 J( O6 H+ j$ t" ?. z% m! ~
ListView1- >Items- >Item= ! ^3 R% U3 \$ D9 o, r1 V/ R
ListView1- >Items- >Item[j]; 
- \3 \, r) F! k6 w7 h1 ?3 E& nListView1- >Items- >Item[j]= - W/ M" a R! D5 Y
ListView1- >Items- >Item[m]; 4 z$ L* u& R6 w" I3 m& q
} 
$ D# M5 I' t+ I; `} 0 D) b3 V. h; L$ Q+ ~ ]% Y: M
ListView1- >Items- >Delete(m); & O. Q4 Y+ ^- T8 d4 e4 K# l9 ~
return; ' B7 F# }: |) N3 S. }) W
} 
7 \! ~4 q: ~" L. ^" Z/ ?7 z; n8 b* y ' C7 `2 h6 U# J d
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
% _& K$ J6 P4 ~/ f1 H3 N; F>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 $ T1 _6 `6 o) l
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
' h$ u4 f. k. |) b% `# U- Y子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 7 t7 F9 s) H) g& p% n7 ]" d% _
ListView1ColumnClick前面即可。 # N$ P J+ z, e' v
#include < vcl/dstring.h > / u4 E S* s* K* w5 F& R6 a
AnsiString __stdcall sg(AnsiString str,int n) 
6 @& x* `! g$ f: O{ - X7 e9 o) k' B. \. t7 p
int l,i; , C% H7 ^0 u" b3 Z& Y7 I/ p7 w
AnsiString qq(str); 
+ X4 p- ]6 H4 P% F8 f* M, Yl=qq.Length(); # J( N& U H+ N+ H
AnsiString p(str); + c. R. `4 f7 e; s2 w
char a[]="\r\n"; " F* t% v8 G* K! x, V
int j=0,k=0; 
9 `+ [' ~+ Y5 \2 `+ M7 Wfor(j=1;j< l;j++) 
$ I9 m4 R$ ^0 z! Q4 X5 j{ 
4 G% h3 ?) `3 m/ Ui=1; 
& R( ?$ f5 i. C) F5 Mwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) 
* M1 @, o: H; ?# P/ ]' n{ 
, l% i: l+ `! R0 J: bp[i++]=qq[j]; ( r% O4 D9 D, t
j++; / \! p) N) A0 e @% L
} ' E4 q* R8 Z! `" s( Z/ s, m. ]# H3 R
k++; 
5 p/ d0 p, R' b0 A. r% C) yif((k-1)==n) 
0 r& e, [# w$ s: M7 Obreak; 6 J2 B' x2 y3 }9 E4 `
} 
$ m% `( g: Q* b3 p2 _; gp=NULL; : h y* x1 T4 P- R
return (p); * \, G1 E; f8 S& ^
} 
* G3 C: k( g" S7 _% i / U/ H8 q/ v/ W! R. c! t
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
* p: G* P4 A E+ |, G5 U* F8 F>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 2 Q' [$ i" \4 M/ D* l
可完成对此项目的点击排序功能。 $ k! o( l6 e5 M4 X `& Q1 a3 [
for(i=0;i< m-1;i++) 
8 Z' G2 ?! M, e; L# S3 Wfor(j=i+1;j< m;j++) 8 M& M2 l% J' x1 z
if(od) 
5 }- i: ~! q' @# z; _- s& D) C. Z{ ' a" a% l @8 n
if(sg(ListView1- >Items- > 
5 h# a& l" l9 f& _Item- >SubItems- >Text,n-1) > 
# A4 X, {& c% @sg(ListView1- >Items- > 
2 G) r7 S; q+ `# ~ k6 HItem[j]- >SubItems- >Text,n-1)) # @5 u& _, I* F7 ^

2 T* G" R$ ?6 Y9 g4 ^// ...以下从略 , l8 |, {; A; X' n9 b* H
 
% l( ?9 P3 M. j/ g$ D最后，删除临时的交换项目。 8 M( x; X1 C; q0 K* q2 q; U
ListView1- >Items- >Delete(m); 7 N. O) t h) m h7 D
 
3 @! i4 C) s# [---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 1 E3 G6 ]( i# p+ v* b3 D3 x7 u
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
( g* U2 Q8 a6 u4 g, y5 I