查看: 8973|回复: 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- . @, _6 x# f$ V7 y+ T! [! {
>Caption进行，与其它列不同，所以要单独进行排序。 " ?$ Y3 ^5 j) D4 `) j
if (n==0) 
! A! h; B/ _6 Z8 K6 `$ V& G% C{ 7 m* H3 _, r/ E/ A
for(i=0;i< m-1;i++) 6 d" x6 r! i! F; K# k6 ^% p' Q
for(j=i+1;j< m;j++) , n" h" G, k5 d* n2 X
if(od) 
& c, \9 s- N% f* o{ 0 g, l4 a1 z% U3 e, V/ T4 b* b
if(ListView1- >Items- >Item- >Caption > % _9 ^! J+ K6 G* s
ListView1- >Items- >Item[j]- >Caption) 
" y9 v% A; o) T{ 
& x+ n f0 c) S( z8 M+ o6 tListView1- >Items- >Item[m]= 
0 i2 `$ v# U) ^ QListView1- >Items- >Item; ; R) X. K( w# H8 o+ ?
ListView1- >Items- >Item= 
! V; d* k3 _7 u* _/ OListView1- >Items- >Item[j]; 6 ?5 `3 u' q% v! G9 {
ListView1- >Items- >Item[j]= . L. G0 K4 p; C4 F: V" Q
ListView1- >Items- >Item[m]; ! }1 F6 m, ~, N# A- w9 T" j
} * _7 L: O, s0 _4 x9 S0 m
} 
7 D* e' \2 B/ Belse ( _& ? m/ R6 P- {
{ 
+ O+ t4 ~; T( W2 s6 b; pif(ListView1- >Items- >Item- >Caption< + r' N8 w$ d5 _8 v6 z1 `8 V
ListView1- >Items- >Item[j]- >Caption) 
# l) Y9 I+ _% u3 ]3 {1 Q- t{ # t& }- g& V0 y3 ^- Q9 R! c
ListView1- >Items- >Item[m]= 
2 ~5 l6 W& z d2 kListView1- >Items- >Item; 4 o$ e0 J$ Y- Z
ListView1- >Items- >Item= 5 D7 a# M4 a- } ^+ ^2 n
ListView1- >Items- >Item[j]; 
- p7 f& k4 [5 S) ?3 fListView1- >Items- >Item[j]= 
 L% } D) D* zListView1- >Items- >Item[m]; + }& w# P4 ]( k+ B: |
} ; R0 A M9 ^* e- ^
} 0 C( p- x9 f& |$ E* @6 |
ListView1- >Items- >Delete(m); 
: u; _4 ^3 Y' p9 Z6 O- q6 {6 C3 nreturn; 
2 W) Y' \! @9 @- r7 V G2 `} 
4 @7 t' ?: n6 c 
, B3 C3 ?* N1 b8 d; e) k---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
9 d( ~9 l0 I. x1 e5 n$ d" |>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
! k0 ?1 k4 }1 i- C: z; T式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
' c! s9 E) O6 }" r子项目，需编写如下函数,并将其放于void __fastcall TForm1:: ! D7 J" Z- N; m7 S, F& {
ListView1ColumnClick前面即可。 : J6 N. l a @; _, {1 [8 i
#include < vcl/dstring.h > 
7 e0 h5 E5 f; F4 c iAnsiString __stdcall sg(AnsiString str,int n) 0 D* D- y, [; `6 A8 ~4 x3 A
{ 
' P6 u. T/ |4 {! W$ F1 ?/ Y# j4 ~. Sint l,i; 
) U" W4 x/ M8 }, G" j t/ P' wAnsiString qq(str); 
& l' _& |" R3 H# Gl=qq.Length(); % h8 _% `1 M1 P7 G8 V* O e
AnsiString p(str); 
1 F: d" c( r L c5 Gchar a[]="\r\n"; 
% r. z/ P; }; ~) a f5 i6 k4 L9 {int j=0,k=0; . J* L" r" f) v9 w6 ~ q7 }
for(j=1;j< l;j++) 6 T4 q7 `4 C& e2 V: l( N9 p
{ 
' h4 x8 P' E. r( t% w- J$ v" Ci=1; 7 g9 g/ M; z1 g+ b2 ?
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
7 s% [- \) k( V" {. `: B+ z{ & `* I5 w# v. G$ j9 r
p[i++]=qq[j]; 
& D8 J; N9 j4 W+ I( s; ~1 Aj++; 
$ |/ c( S5 r# d2 M! Q# g7 R( J} 
/ j4 c* I: |* N3 Z6 T2 pk++; ' T& t. G3 }: n3 O! g# Y9 l6 Y
if((k-1)==n) 
* f0 R/ _6 J9 Sbreak; ' Y' j( H8 ^1 \2 I% i
} 3 ^8 _. U, Y7 h" ]
p=NULL; 
1 t( {) ?+ s; u% e; creturn (p); * B9 v9 z2 v# G! |
} 
3 d# u v! F. e% ~! F5 x ; h8 A' C* q8 U' g* [7 h: {
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- & n( s2 b. Q. M) \2 u
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 + P2 Z( Z" F' I- C% n4 z
可完成对此项目的点击排序功能。 
7 T+ V# O8 F* l g" C% q2 jfor(i=0;i< m-1;i++) 8 ]4 d2 }1 E# F+ c5 Q( Y
for(j=i+1;j< m;j++) 
 d1 N# _$ d( b% W) h* F, cif(od) : V3 }% V5 D; g1 D* u4 I2 T. }
{ 6 E9 |$ D6 n+ g; Q
if(sg(ListView1- >Items- > 9 i/ Z- P7 ~3 R& `% u, y
Item- >SubItems- >Text,n-1) > 3 A! a( [* p3 y
sg(ListView1- >Items- > 1 Y7 e, ]1 S+ [, F, N( j% x
Item[j]- >SubItems- >Text,n-1)) 
3 t. w @; U* y) T. s9 o$ k
3 P6 J' a% b a/ U; |9 w& h, M// ...以下从略 
' d! R, C% S9 A- ~1 R7 H ) I. J; c9 @2 S. f( R# m# H& S+ L
最后，删除临时的交换项目。 
' t" C' }! k {5 U' J; HListView1- >Items- >Delete(m); 6 O$ i- s9 F6 b# V& @
 
, E7 X" ^+ d! x2 i3 c---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
1 N. p! x/ ?- o r式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 / W" \/ Q; R1 j' g