查看: 8967|回复: 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& Y% P( E) ~- I>Caption进行，与其它列不同，所以要单独进行排序。 
( ?/ m3 s s; [% gif (n==0) 2 ]; d* K9 l8 W- `7 P# l
{ 
. M% D) R0 w3 L$ Afor(i=0;i< m-1;i++) - g4 U x" I; D! S& g
for(j=i+1;j< m;j++) 
; I% T+ ~2 ]( }5 A# Y0 {if(od) 
. t6 q9 X5 h. P- V5 l{ 6 C6 [" c" c( M1 e+ G
if(ListView1- >Items- >Item- >Caption > - C0 v5 Q' Z7 e0 V1 z
ListView1- >Items- >Item[j]- >Caption) 
) a) e, [4 F1 i2 B$ f' v: t( }{ * I4 U0 G `/ U: l+ ?& m& S
ListView1- >Items- >Item[m]= 8 r( l9 V- K( n( u% @) n! x9 m
ListView1- >Items- >Item; ) N. b$ ]5 i) p
ListView1- >Items- >Item= ' W6 G* {3 O; x4 D" c
ListView1- >Items- >Item[j]; , ]# o8 S6 ` u' L3 x8 E
ListView1- >Items- >Item[j]= . Q4 U) E" ?9 R$ Q( y8 }9 ~
ListView1- >Items- >Item[m]; ' N/ i, H, Y2 }8 k: ~2 D
} % a K+ {/ p4 o1 v( Y7 p
} 
 g: L- I% Y+ F, K: S- S* d% selse 8 m) w" A0 C H* ], J
{ 
7 H0 Z% H+ g& {; ~' Vif(ListView1- >Items- >Item- >Caption< 
8 C% j N. q* C4 W1 `ListView1- >Items- >Item[j]- >Caption) 5 t$ D+ m0 a! Q" K* D. m/ C
{ 
9 y3 x3 n* c: x8 A$ v. aListView1- >Items- >Item[m]= 
 K) k: l6 Y: C+ ~" Y' s$ f5 hListView1- >Items- >Item; # Z$ `' c$ R3 E* r
ListView1- >Items- >Item= # \8 V% j1 J3 D6 b
ListView1- >Items- >Item[j]; 
! T; k# H, d4 x9 sListView1- >Items- >Item[j]= x" j# B- O# G# t. y
ListView1- >Items- >Item[m]; 
6 \6 m q- s+ q} & f0 I! z3 _! s6 o( _3 r9 o
} 
" z R$ l9 q, ^ListView1- >Items- >Delete(m); 0 u& L- \4 T# W& a) r: |( F
return; # p; s% `6 k. K P7 J4 c) m$ Z* `" Q
} * Q+ S ?- _, ]+ i- D: c
 
7 @3 N7 p! M( b) x7 V! g' I; o---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
% r( Z; {1 X" A, g>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 3 V8 P! k B9 |, ]/ k# P2 a1 N
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 0 [* @# r9 V/ b1 q7 R' e6 z; ~
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
9 R) Q* _$ Z+ n YListView1ColumnClick前面即可。 # e& ]- O) R5 W/ e+ j+ h5 `* o2 \
#include < vcl/dstring.h > 
0 x% C, I; e( ~6 I {AnsiString __stdcall sg(AnsiString str,int n) ) {+ s! V1 I& F
{ 
- @8 Q& o) q# D% o, C9 Kint l,i; $ G4 _9 s c) ^; B& X* y/ y% k6 c
AnsiString qq(str); 
; Y( [+ R& S+ ~% X: r! r2 hl=qq.Length(); 0 q# d4 O3 I! m# X% U% D( w9 f
AnsiString p(str); 8 z e4 I# `; E' \, D
char a[]="\r\n"; & ^: C8 M' c: ?" D
int j=0,k=0; 
4 ~! N8 e* q* e( L6 Ufor(j=1;j< l;j++) 3 `5 g1 G$ C" }0 N* a& v) E, f
{ : e8 U, R" Y; y
i=1; 
 K6 ^8 o7 [9 y2 p! Cwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) 
) H2 K0 K& r3 C# l H1 u' S{ 
p[i++]=qq[j]; 1 |) w- t5 M3 S7 j+ m
j++; ! A; S! P: A. ^0 I5 ~' G
} ' z' `% F! y. ~! k
k++; 
# O' U6 Z. I* z, Y- Tif((k-1)==n) 
; C8 a" X. H! V' v* y" N3 j0 kbreak; 5 g1 B3 e/ C$ ~3 Y
} 
2 Z8 D2 M) U! y" wp=NULL; & E0 c+ M5 e# o1 S' f) C
return (p); 9 V5 N2 t8 l! v1 i% `
} 
# l: v: ]5 r. U: {4 p7 h. w* N 
- v6 Y0 r, P8 e5 ?---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
$ T$ z, h m0 U" o9 A3 z>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
* U7 h1 x" B" X可完成对此项目的点击排序功能。 3 o2 M8 c( b' o' ~
for(i=0;i< m-1;i++) 
$ t* Y8 ^! u' Y' ffor(j=i+1;j< m;j++) ' s$ h6 d' S& {2 J& y2 M3 g. m" ^
if(od) % q9 |& Y: Z9 z3 E
{ " u3 |8 i+ c( H" E; D
if(sg(ListView1- >Items- > 
. @$ `$ V1 B- B0 w BItem- >SubItems- >Text,n-1) > 
1 p' g* Q/ ]6 r9 Asg(ListView1- >Items- > J6 Y/ }+ k6 N. j( X8 F
Item[j]- >SubItems- >Text,n-1)) 6 P$ d% W9 m- B4 |, T) V' X
0 v- A% @4 |5 m2 N7 d. \
// ...以下从略 4 K6 [# O) {; N' w- R
 * U# b& d3 j; {7 f7 A% k
最后，删除临时的交换项目。 : W( E7 K, ^7 Z( C# C7 g0 O! `- H
ListView1- >Items- >Delete(m); 
3 K9 L* `; ]6 U6 I& i% Y1 T$ h* o 
: F; @0 G i( W' \1 Q8 \2 y; E---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
" r: I# u! |. t S# @) c! X式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 7 w8 Q+ e4 W( D) t2 D2 q8 O0 N/ v, |