查看: 8409|回复: 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- - Q6 m0 m8 z4 E
>Caption进行，与其它列不同，所以要单独进行排序。 
* b m+ t5 w$ j$ ^if (n==0) 1 r8 D- H9 y' M( e4 d! n+ k& G
{ 
9 W7 s+ N6 j7 `2 e5 Y: I; qfor(i=0;i< m-1;i++) - J- p2 L6 r2 ]: O4 d7 F+ Q
for(j=i+1;j< m;j++) 
6 i) o! E+ b7 O- ^# [) Jif(od) 
& O* M! e8 \/ x/ j# w8 Z( h# B{ 
& i- f& G! d* A9 K' w+ }. ]9 kif(ListView1- >Items- >Item- >Caption > 
) P( x/ U, u! f e" b+ dListView1- >Items- >Item[j]- >Caption) S8 k2 E! a+ G) P4 f
{ 
8 G+ e! }, j% C. y5 T4 B2 @; VListView1- >Items- >Item[m]= 
, u, F: P# Z" ?ListView1- >Items- >Item; 2 ]$ Y) u. h8 B M7 g. R0 R
ListView1- >Items- >Item= 
6 p8 a) i- R/ b2 r2 SListView1- >Items- >Item[j]; 
7 | D3 @; G/ O* D% i# u' y* `ListView1- >Items- >Item[j]= 4 E7 @4 T6 ^* ]2 X3 A* \
ListView1- >Items- >Item[m]; . P" n9 X- M2 K4 j! W
} + _1 S' j5 y6 S) B
} 
8 @; N( ^0 l) L; X8 @8 U2 Nelse 
. n s# A! n0 c+ f) T{ 
7 _) n# x' `1 {- vif(ListView1- >Items- >Item- >Caption< ) @- f4 @9 V$ p3 v6 _1 b
ListView1- >Items- >Item[j]- >Caption) " ?2 _8 T% a4 g6 i* t' |% s
{ 
, _: u& _6 x: P% ]* V( YListView1- >Items- >Item[m]= 4 T# v+ i$ D: Z/ M
ListView1- >Items- >Item; 
& F* ?2 Q* {8 s8 f1 B6 P, @ListView1- >Items- >Item= 
% u) p: m6 D* A: C! @ListView1- >Items- >Item[j]; + W0 B7 C8 N3 j3 X% ^8 m% H, ?
ListView1- >Items- >Item[j]= 
& v0 A- f6 l1 _* v. VListView1- >Items- >Item[m]; 
2 z0 V+ V- {+ w6 B9 Q! V} 3 ]+ q; `; K; x. O ^! r5 Z
} - g/ d1 L7 W J. g/ c, q
ListView1- >Items- >Delete(m); 5 Y" J+ I. E/ W6 [4 u
return; 
3 M( r! N+ E9 c, n. S} 7 p% J0 x W* d8 k
 
' X' w# F/ `3 p# M---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 4 ~& D1 G1 H1 z" g6 Y' y
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
+ f3 k) ]% }+ v. U$ B/ ~式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 : D8 X, w' C- X! ] S
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: ; H; H9 W' b8 ~/ X
ListView1ColumnClick前面即可。 ) b+ {( R+ D i3 o$ c1 U
#include < vcl/dstring.h > 
: Z3 [0 e/ H, I" r! A7 @% cAnsiString __stdcall sg(AnsiString str,int n) 
2 Y9 e' [+ j/ \# s1 `% T" N{ : Q9 D7 J, m, O. @. D6 x
int l,i; 
: R& q* m9 H' S- t0 rAnsiString qq(str); ( R( ~% B+ E* D+ |! e
l=qq.Length(); + A1 A. n, Z% P* B$ Y
AnsiString p(str); 
# F8 k- c( A( i, Fchar a[]="\r\n"; 5 F1 Y/ W& O# e: D! E4 z( d' s% q
int j=0,k=0; : R. G4 s5 c- P# s' L2 F& C$ Z
for(j=1;j< l;j++) 
. ~: U0 \* ?- {8 [{ 
7 i! {, N: Y* [# Y# K% oi=1; # [, l3 i9 F& `) t& t9 V5 V4 E, R5 z
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 7 _, d# @ e. I" `: o
{ / R; v- D! d! W
p[i++]=qq[j]; - m0 r& u- Q: }! @: S
j++; 4 N( F, V: C/ F, _4 r; ~. S
} 
) g m( d5 B, }( `* U tk++; + E [$ W6 @- r( X: e3 v& C2 c
if((k-1)==n) 
8 ]: y. N: a$ L' z" A4 y- nbreak; 4 s' I3 {4 w$ `+ D8 ~' {% }* l: x
} 3 Y$ A' A" I1 ~ R4 n9 L) g
p=NULL; 
$ a. ~ E$ H! {* p- D8 xreturn (p); 
, @* {- [$ W! A* L* u8 S4 \} ) r" [: w6 y; c) q
 / O5 B; m% A" c
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- - s9 @" K! H4 t
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
- Z D; p6 B' @* ?1 r; d可完成对此项目的点击排序功能。 
- b: W! ~+ n+ |- N- p0 o) x7 hfor(i=0;i< m-1;i++) 
! f) b Z" ^; v lfor(j=i+1;j< m;j++) . W/ _: v2 V/ `, D5 O/ S3 O/ S
if(od) 
% G0 X3 u. E/ c{ ( g. j& E) O; J- h- ?* g% Y( k
if(sg(ListView1- >Items- > s6 D: c; l* r
Item- >SubItems- >Text,n-1) > 6 s: u+ O( d+ K/ m2 I# x* J
sg(ListView1- >Items- > . R# S# ~- g( B5 c* t4 ~
Item[j]- >SubItems- >Text,n-1)) - r% ^* ]5 g% O

3 o+ w4 O! _5 i* e6 S// ...以下从略 w# f- h' A1 `7 g$ {8 x6 C3 C E
 
' Y2 I3 d6 I* X最后，删除临时的交换项目。 . n* Y+ ?) y7 Q/ x: k" ~8 ^
ListView1- >Items- >Delete(m); 
5 d3 z9 r e/ g' n. D3 X2 r 
% B- M- k( k, i: }---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
7 z5 G+ R/ \$ e$ J5 L式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 8 M4 e+ D2 e, a: C7 ~+ V$ u8 u2 n