查看: 8938|回复: 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 f+ d j# s2 `$ b>Caption进行，与其它列不同，所以要单独进行排序。 
if (n==0) 6 a- p4 z _+ t$ l& L% d
{ t L1 M& F# E! }
for(i=0;i< m-1;i++) 0 r2 G0 U; l, }% L* K
for(j=i+1;j< m;j++) - j2 e+ t! W/ Y" c% W
if(od) ) V U% j) b6 J
{ 
* `% w( i3 I# j7 l, |, B/ X7 Nif(ListView1- >Items- >Item- >Caption > 
! m) _$ ]4 S5 {* Y( J3 e3 e/ T4 y9 rListView1- >Items- >Item[j]- >Caption) 
2 [, _5 f$ N1 Y{ + ^/ F( Z2 l+ a9 {8 g; i
ListView1- >Items- >Item[m]= * ?2 x$ \2 }1 u
ListView1- >Items- >Item; 
: d% I$ m# k3 M6 p! M% o: q( TListView1- >Items- >Item= 
: T+ m' X, x3 n9 ~ListView1- >Items- >Item[j]; ' {/ |2 I u4 p4 }0 ]4 P
ListView1- >Items- >Item[j]= # b* e* o& Q. A8 k \7 {6 ~5 Y/ V; E
ListView1- >Items- >Item[m]; % H# a4 Y8 [2 ^
} 
& L, \1 W5 y8 O$ W$ E2 D, b} 
1 K& F$ F7 p; i; Y- n+ ^. zelse / \; e( x6 [3 ?; J0 P
{ 6 F+ k# d1 R0 `" |/ W
if(ListView1- >Items- >Item- >Caption< 
2 t7 q7 ^6 H( ~1 kListView1- >Items- >Item[j]- >Caption) 
; T0 \& D3 |- D$ {0 @{ 
' ]+ W- F/ T5 V0 b+ BListView1- >Items- >Item[m]= 
 O& ~8 Y5 P7 [0 `. yListView1- >Items- >Item; 
* A. ~0 f# `! I3 `+ F. z! hListView1- >Items- >Item= * `! ], w$ D0 `5 R0 ^( B3 t: k
ListView1- >Items- >Item[j]; 
' c, p+ ?4 G2 ?4 l6 xListView1- >Items- >Item[j]= 
5 W" V& p2 i. m6 C( qListView1- >Items- >Item[m]; 
} 
, ]3 g& @5 r5 h/ X} 
5 y. B, z& ~, }4 GListView1- >Items- >Delete(m); 
7 L0 z$ j. X3 A1 N( m0 Kreturn; 
8 R, a! D+ W- F! _8 l5 f% R- P} 4 o8 P- ?. M2 e+ U2 b7 H4 ^
 $ u# }" L# W4 a5 V( |
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- - ^6 V9 F) A5 ^4 K7 L3 J5 v+ V9 a8 h
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 9 P7 Z: s* K3 R$ @! m7 y
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 8 z7 c8 g5 ]" V2 A* H5 Z
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 5 b6 l' n! C; ]; S3 Z; o1 V* o/ C
ListView1ColumnClick前面即可。 Z2 ~* f. C9 O, v5 [/ U% F
#include < vcl/dstring.h > 
0 \* u9 t% G( S# b- X. lAnsiString __stdcall sg(AnsiString str,int n) $ h! |( T3 T! K: i
{ 
0 Z+ t7 Z3 n; `9 j; F! |int l,i; 
- W$ {+ E0 O6 B7 \0 A$ g( Y1 eAnsiString qq(str); % j1 i* h' d( S& J b8 w n
l=qq.Length(); 
. z, D u: r: T: C. O( Z5 [7 uAnsiString p(str); 2 Z, r$ s) _. @3 Y! g6 X+ x2 x, _! {
char a[]="\r\n"; 
7 d: y; T: d/ F( gint j=0,k=0; 4 f. x }' [% y' q9 E3 O
for(j=1;j< l;j++) ! l% A* m' j( I
{ 0 k% I1 V- X0 F+ X- ^; x& B
i=1; 
" l% k: h& {0 I, f! ^! C6 I, D3 Iwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) 
$ G8 G, Z( B& P! L( {{ - X W2 b# F0 s/ R
p[i++]=qq[j]; 
$ f) X5 [3 E2 ~0 q2 q" B! }! z4 lj++; 
! C k }: x% r$ V# @* x} ; }" g9 }/ q# Y1 w5 @! D2 j
k++; / z- v2 U# F6 A
if((k-1)==n) 
4 \" S$ B7 c3 I5 b. h+ J% cbreak; 
 v# J% x% h) b. d% n1 D5 g- l} - x& E# U4 y; m. l
p=NULL; . }! |8 r4 c2 x' G5 Q9 X, I
return (p); 
; H0 ]1 M1 r: M8 b} ; s! k: j j+ B' G5 y/ B
 
4 h) |4 V9 S, T I0 ?7 P4 ?% Q---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- $ _+ U8 ^! T6 c# a9 ~- k" H
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
8 h7 ~; T0 Y' B& @0 o可完成对此项目的点击排序功能。 7 }8 J' q3 l! Q5 X, _' J6 k
for(i=0;i< m-1;i++) 
! f( k. X: O1 \( Pfor(j=i+1;j< m;j++) 
; F$ n/ a( U, Vif(od) k+ k0 M4 ~2 [8 h, N
{ 1 {; n, e, {" s1 X! g
if(sg(ListView1- >Items- > 
5 g; i C2 Y4 i' q8 CItem- >SubItems- >Text,n-1) > 
7 ^ I; O& P/ ]# L3 gsg(ListView1- >Items- > ) A9 ^/ m# h5 e/ U) p/ S
Item[j]- >SubItems- >Text,n-1)) * o/ e' B N7 _

% L+ r; G4 [; B( `' @; d// ...以下从略 
/ d* N$ q2 s$ X q' l) V6 P) o . w$ S: v1 \/ m# t% E
最后，删除临时的交换项目。 ! R8 q0 A3 U, t1 r2 X
ListView1- >Items- >Delete(m); 
( H. w* x6 `, C: N" t" A( u/ r 
3 H7 l/ ~8 n" p& s---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 " ?& L; H9 _$ T1 ~, u
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 % J; A. T: [5 ^. W" i