查看: 8946|回复: 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- 9 S# M5 w- o) M$ `
>Caption进行，与其它列不同，所以要单独进行排序。 
4 b& M# j! l* r6 E' a9 i, Vif (n==0) 
0 O& ?7 V v8 f& ]" F{ 
: N% _+ k6 M6 q4 h1 Ufor(i=0;i< m-1;i++) 5 ~" ?1 D8 D h( B
for(j=i+1;j< m;j++) 5 W0 p5 s0 `4 {
if(od) 
( o2 G$ x$ E) J2 O/ k j{ 0 ~7 O$ O, y/ ^% g8 v8 b% y
if(ListView1- >Items- >Item- >Caption > ' J j' W6 X6 [* c
ListView1- >Items- >Item[j]- >Caption) 
% V, E/ u1 e: @. x1 ~{ 
- V4 E& \* A! L, |% C/ t: SListView1- >Items- >Item[m]= * ~8 l6 G" K5 O& w7 b( D0 C
ListView1- >Items- >Item; 
; y# d9 ^( ?; H; ]% M$ G" a" DListView1- >Items- >Item= ( x% y- ?, m8 {, D+ u7 i
ListView1- >Items- >Item[j]; 9 q) ~) t; D) R7 k9 ?) U- |% b
ListView1- >Items- >Item[j]= : i6 h$ h2 v( l" x% o
ListView1- >Items- >Item[m]; ) s# V# V! c: L: c9 H3 }% M1 [
} ' [5 D% ~8 I+ K: u f
} + R1 ~8 h1 Q7 B9 t8 W& \% W
else 
" @' B. b u- V y{ 
" \3 s* x; a& Oif(ListView1- >Items- >Item- >Caption< 1 s4 E* f; j( Y" F
ListView1- >Items- >Item[j]- >Caption) ' i5 h# A% u* o& u. F |
{ 4 F% Y) r5 r4 u
ListView1- >Items- >Item[m]= 6 R1 u& s, J. ^" ]; m
ListView1- >Items- >Item; + E7 M* J0 i% ?: `1 D3 ?! l9 P
ListView1- >Items- >Item= 
& z1 o' N. F' A( [5 _) A; L9 u; ~. HListView1- >Items- >Item[j]; 
( u! W& c; M) g" }( k) AListView1- >Items- >Item[j]= 7 L# w0 N( h3 b q
ListView1- >Items- >Item[m]; ) t6 g0 y2 r) Q
} 
; y. p" u e A- S- C7 ]0 p: Y} 
; g% f( P1 }* N) v% \8 rListView1- >Items- >Delete(m); 
5 S5 y6 c$ q+ W7 |return; 
+ B2 _# B7 k b8 Y$ C( i) b" Z) f} - p9 d8 y9 I- Z9 v- ?
 
; H$ @3 l+ d& b---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- ) O8 }4 {3 C% F/ Z
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 " k2 p9 _4 z8 `8 n. K+ y( C7 }
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 ' `+ t4 g* M2 \" h5 S) _
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: . J/ N5 a1 G# q% h. a
ListView1ColumnClick前面即可。 
, x. Q# ^+ T& w3 t5 ^* u4 D#include < vcl/dstring.h > 6 x- V( C, c4 A
AnsiString __stdcall sg(AnsiString str,int n) 0 N' G+ l/ x0 [ E
{ 
# }3 X/ N& }1 Hint l,i; 
9 ]! g; t$ p" u2 x. XAnsiString qq(str); ) B+ E( u( N$ K3 o1 |6 U
l=qq.Length(); 
: f( \. V0 f+ N( oAnsiString p(str); 
 k* h: r8 B6 e! \. b& mchar a[]="\r\n"; 
% m; H. d& P( ~" g4 A2 ]int j=0,k=0; + q! V# @3 x* |& b( Q
for(j=1;j< l;j++) 7 P- N0 o6 Y, c9 y( H
{ , x. \# S+ W$ e$ _- U( }7 a
i=1; 2 y! G' y! s4 l7 z$ i) F
while(qq[j]!=a[0] && qq[j+1]!=a[1]) $ a* V* z5 l5 _& W
{ # h3 F5 h- N4 G6 _+ v
p[i++]=qq[j]; 
& Q' C4 a$ D) S$ \j++; 
! w9 @- N* ]; T8 p3 f) O} 
. _% T9 l& u/ S) O; m% m0 p$ [k++; ) H: Y/ c8 W2 H; m- Z
if((k-1)==n) $ W3 ?( ]. T6 N7 J$ t, I
break; : q C/ |! a( m. g" a/ K F
} : J Q5 o' l' M) d" C
p=NULL; " o& K7 k0 Q; k( B3 k
return (p); 
% T0 i, y; K* D/ `4 |; C4 L. n} ) `( a: c# E+ \, u6 e& ]1 a5 L7 Z
 
6 g! y4 `" k; B2 {& G---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- + U3 |- A1 y x0 M
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
' L$ Y$ \ \% R# @" Y7 i2 w" h% Z可完成对此项目的点击排序功能。 2 j. F& T" c K4 H" @; ?# V
for(i=0;i< m-1;i++) 
$ R* Y4 k. x5 |* S( Jfor(j=i+1;j< m;j++) 
9 k+ A% k/ x! d9 P4 m3 @if(od) 
! Q& ]9 Y" m- U( \{ 8 ?' N9 f* {" ~, D4 q1 e
if(sg(ListView1- >Items- > 6 H" [4 A( [+ t; Q
Item- >SubItems- >Text,n-1) > 
; O) K; z7 P+ t2 ?+ Vsg(ListView1- >Items- > 
4 I q4 y% K6 V8 b" i0 yItem[j]- >SubItems- >Text,n-1)) 
* P' {4 c4 v( Y9 F9 @' i- T7 o
// ...以下从略 
3 e/ w6 e$ b8 {& j+ ?( e 
; D. J3 M2 Y: C' }+ m. H, }最后，删除临时的交换项目。 
9 P: {; [5 j3 w0 J& OListView1- >Items- >Delete(m); " w; j; O! r$ [+ u' F, z/ _1 F; I
 
1 y# Y$ G( D% }4 B1 c7 I---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 + Z* s/ B9 [0 Z5 X: o1 ^# k: G8 @, E) u$ k
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
" A- j4 ?' s. R/ y