查看: 8978|回复: 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- 
0 S. u* [& ]& i. u( j5 U4 f>Caption进行，与其它列不同，所以要单独进行排序。 % }- q" U4 b. z$ ?
if (n==0) 
 l' q8 d- \9 P: P$ i{ $ v1 u& E9 k8 \0 }: C5 O/ {" f
for(i=0;i< m-1;i++) 8 l6 R0 t& n D2 o- c5 @" y
for(j=i+1;j< m;j++) 
% D2 E& l, B8 X1 I3 j: n6 Yif(od) 
; R' P1 |5 Q1 o; n% Y: g1 ~{ - E: [) b+ |% e4 w! K M
if(ListView1- >Items- >Item- >Caption > - Z: H6 }, C; c$ B+ V
ListView1- >Items- >Item[j]- >Caption) - x) S% `0 a! c- m) [4 I
{ 
/ j- V. \& @: @/ I: jListView1- >Items- >Item[m]= 0 `+ }$ V1 y/ j- s" F
ListView1- >Items- >Item; G! F, `5 y/ `' \" Z: Y- ?
ListView1- >Items- >Item= 5 L0 A8 b. F2 u2 C: _/ b3 f: s% B- n' l- h
ListView1- >Items- >Item[j]; 
5 O) M# t& ? JListView1- >Items- >Item[j]= 
# H7 n7 {6 v; O% l; m1 tListView1- >Items- >Item[m]; + F& O7 S" _; K3 O+ d1 h3 Q7 L9 m
} 
2 O& J" a' d. n7 q2 N} 3 j' R( E7 x3 H' m
else ( |4 ~1 p, v- @4 y# i
{ ' A8 \9 A: L$ S, @
if(ListView1- >Items- >Item- >Caption< 6 k# S, w' A4 A1 R+ Y1 I/ r5 j3 u$ o
ListView1- >Items- >Item[j]- >Caption) 
( ?' c4 J" q1 `( ]% z{ 2 v1 \. c: D5 O$ O$ b; R9 q
ListView1- >Items- >Item[m]= 
: D4 j& y% K) F# R$ B! v+ ]. FListView1- >Items- >Item; * L* Y6 {. \6 Z0 J" A
ListView1- >Items- >Item= 
! |6 i9 S! T$ V& N! W; z) i+ a+ _ListView1- >Items- >Item[j]; % j& k* G) }; O
ListView1- >Items- >Item[j]= 
; p! M( _ h- u5 Q2 hListView1- >Items- >Item[m]; 8 _. R/ d8 s7 j
} 
7 S5 J/ `& u6 c3 s2 d} 
" l* A8 M; M. H# ^ListView1- >Items- >Delete(m); 7 x4 `1 ~6 v+ P6 Y" }
return; " _& e* U0 d( a0 L7 `; Z: x# y
} ! I: x0 e( y, n1 `! P2 v, G
 
: X0 l4 |3 d$ Z% R* d: D, L! I* N9 H6 H---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
- j9 W" H) c6 ~+ K# P( g! d* [>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
4 x' E9 z( O; f* M0 s# q6 S# c3 V, r式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 3 J: e" N/ A+ E9 M" ?
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
; C- P' n1 d O* HListView1ColumnClick前面即可。 
' L9 W! [; P0 F9 Z' V$ @( Y5 W) ], d#include < vcl/dstring.h > & n. |% f) L/ \ V' P% T. g V
AnsiString __stdcall sg(AnsiString str,int n) $ ^0 M0 X# a/ q- A3 q' ?5 {
{ : D% |; p. f) S1 i, N
int l,i; 
, ]' S0 v' \3 d' \7 Y$ h; l. CAnsiString qq(str); 
3 j6 R6 s# a( C4 h0 |l=qq.Length(); W3 E7 N* d5 y0 ~$ I/ ^
AnsiString p(str); 
! j$ G5 n- W t4 t8 {& R! wchar a[]="\r\n"; 
$ X, g, v) o6 Qint j=0,k=0; 
9 W/ H2 X' Q1 I# `) w/ ~1 W7 nfor(j=1;j< l;j++) 
 N# B* d# U7 H/ u- x4 ~6 ^7 a{ 
6 x+ J5 \: n" K7 u4 ~. j& ^i=1; ; O. m. U3 C7 J3 }9 b# S8 z
while(qq[j]!=a[0] && qq[j+1]!=a[1]) ( j- ]* [+ _: [1 P8 p! K: D
{ 
$ G: c: |+ Z9 K1 f4 Sp[i++]=qq[j]; 2 k; S* B# {6 i
j++; 
, j, m5 m$ }3 [} / f* n4 Y% b2 }& U! n8 A! x& r
k++; - f0 s, w/ [- u0 Q6 u
if((k-1)==n) 
7 [) p& M+ |1 o' R( B' H* g# }; r" l. pbreak; 9 w- p. X( U- R! j* q: }5 x; R& N! x1 W
} 
! ?9 I% L' H U/ {% ~- u) Q( Yp=NULL; 
 w6 b4 A. X8 j$ \, i! lreturn (p); 
 G x' h; @( x6 U$ M& @} ' T! R( f! a5 A0 }
 7 k7 b) H l) x7 {. O8 f/ s
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
1 G. N1 I0 p- I8 P>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 . t" w) s. S$ L( g$ j
可完成对此项目的点击排序功能。 ; l% d' s, ]- E: W' D* {1 L
for(i=0;i< m-1;i++) 1 {% ]4 O7 N3 x3 s
for(j=i+1;j< m;j++) 
. N3 {0 O4 S% j2 _2 Z8 v. H1 r2 Aif(od) 
# J, v, r% @( ~3 H0 _{ 
5 |6 X! `/ Y8 N* b" u5 C; f% Oif(sg(ListView1- >Items- > ; L; _" M. R/ Q2 A. |# {
Item- >SubItems- >Text,n-1) > 
+ q! W% l+ i' Y0 r, k& o9 ^sg(ListView1- >Items- > 1 d) V5 l0 O( a7 c p: \* U3 G/ u
Item[j]- >SubItems- >Text,n-1)) 7 O% z J, z! P( |

2 F: ?# F; z+ b// ...以下从略 
5 Z( Q7 W# y4 D9 ?: ~2 ~ $ R) d2 m' L1 g
最后，删除临时的交换项目。 
2 ]. M! v+ Z7 \1 M: TListView1- >Items- >Delete(m); & t7 q U) L& h. s2 R' ~
 
* K( _" E: K2 r% F6 a---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 3 ]0 H/ n8 d, J. }, @
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
& I" Y8 x! g1 H; I% k1 I% m7 {