查看: 8939|回复: 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- * ?/ n1 T( j; F& d4 \& B9 E5 A
>Caption进行，与其它列不同，所以要单独进行排序。 " Z" D' O0 E. `! ~
if (n==0) 
8 X. C4 u0 s5 R4 G{ 
. i7 o8 S# f6 K9 vfor(i=0;i< m-1;i++) . k* Q. S; {1 F
for(j=i+1;j< m;j++) 
: ?& X* ?+ u: y! iif(od) # }1 |" a. P, j6 a6 h
{ 
* I- j* I4 u2 f' R4 [& N$ ^2 }if(ListView1- >Items- >Item- >Caption > * a2 @8 F/ m# S2 Y) i
ListView1- >Items- >Item[j]- >Caption) 
1 J |' \ ?. M6 _4 [{ 
3 r1 U [7 e; N& V3 ]/ S$ }ListView1- >Items- >Item[m]= " K# g6 A% Z& |" |2 T3 @9 U- {* D2 ^
ListView1- >Items- >Item; 
' ]2 q7 G# d( u3 _ListView1- >Items- >Item= 
 ?4 j& M( ` ]5 s( s' S# pListView1- >Items- >Item[j]; 
: O5 x+ M- j n( P& A, iListView1- >Items- >Item[j]= 
( I( H7 |+ D* jListView1- >Items- >Item[m]; . Y9 n8 x0 b: N+ {- c# u" [6 f
} 
7 j' ^, S' V1 z; s$ O} 4 C& P/ S4 u0 {! E; W# E/ H
else 
. Q. ]# Q. y( B% c: ^{ 
1 K7 R( Z! b$ j1 ?if(ListView1- >Items- >Item- >Caption< 
# A9 A4 f% U# D9 j, N( v' LListView1- >Items- >Item[j]- >Caption) 2 `, Y0 O# @/ T5 X
{ / p3 E0 S) t3 F7 M
ListView1- >Items- >Item[m]= 
0 x2 F1 y8 G: X/ ]/ c: n3 Y: i# Z# AListView1- >Items- >Item; % v- S- V; F/ u+ f3 A* F+ p
ListView1- >Items- >Item= 
7 U/ A4 N: ], H2 w; e& M$ W; w# @ListView1- >Items- >Item[j]; 4 j/ h3 S2 t: t" [# U% v' A
ListView1- >Items- >Item[j]= # N4 q) s- O. X6 _$ A# c' I5 M
ListView1- >Items- >Item[m]; 
% l b, B6 ^$ O) s3 c+ t} 
1 ~' T. U' ?: M c& z) @3 W} 
6 o* ?3 o+ D/ h* u8 zListView1- >Items- >Delete(m); 
; z! P2 z) F5 x! t" F* jreturn; ! ^( p# Y' y& i: U3 A3 k
} 1 N- y& O$ Q' J9 p# x5 c
 
3 g: Q2 Z7 t ^3 h1 @& B9 B---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
2 \1 Y+ _( ^6 Z1 t6 D>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
; p' w7 @, q8 o; @1 D式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
* X& l! e) x( f1 V1 Z子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
+ h% Y! w* q9 k' c" i+ B* aListView1ColumnClick前面即可。 . F0 Y8 O! _7 {, p
#include < vcl/dstring.h > / ~! t6 |1 N, h4 K5 Q4 G4 h8 v8 B \. s
AnsiString __stdcall sg(AnsiString str,int n) / g: z: g6 P6 Q! V# u( p
{ 
# x: R' p2 V# m, p! x- B" c) P' Sint l,i; + F, q, l. A2 ]1 t; D/ {3 g
AnsiString qq(str); # d/ Y1 f; c* A9 o+ f
l=qq.Length(); , k- D( {9 R; J; q2 c+ v5 ?. L
AnsiString p(str); * C- X" s( q7 M5 G. b; G, z, x
char a[]="\r\n"; 3 b( ?4 ^' s/ y1 ~$ E
int j=0,k=0; . t/ c8 P( a- z% \- n2 U
for(j=1;j< l;j++) 
0 |* K: }. U' x3 y# _, D{ 
) q- x# R! P" D% _, f, q" Ii=1; ; r' \) G$ i! A [* K
while(qq[j]!=a[0] && qq[j+1]!=a[1]) , X2 ~& `2 r3 K% X( H
{ : _. @5 b- v( \7 {# o
p[i++]=qq[j]; 1 ]& T5 f1 X2 x r: e3 @7 m8 O
j++; 
5 h& U4 G4 D7 J/ r) N) ?} 9 `1 d) z1 ~# T* u; X
k++; " l9 Q5 \% j! O
if((k-1)==n) ) O) C% I5 x0 o: p7 K& j8 c
break; 
5 }+ J0 T' Q" A) R4 n9 J* B} 
9 }# s2 A" z/ Ep=NULL; 
6 H* ^# V# i k, vreturn (p); 9 e; y& h( x& _; M* N
} 6 c/ p+ q- ]% j+ I6 [7 w
 
$ n# Y4 S! B/ w! Q---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
1 J/ L+ L4 @) e( l; I, @4 [: L>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
( s) O3 o7 i7 x* J7 ^0 x+ L1 R- E可完成对此项目的点击排序功能。 
+ \+ D- m: I% D; V7 e. p) e: `for(i=0;i< m-1;i++) 0 Q! g+ z2 M& s) R" x( K2 d, a, Y t
for(j=i+1;j< m;j++) 
' z2 o1 I% r# v- {: P1 I- R3 gif(od) ; Y" a. u/ y1 v$ o1 L0 c
{ E/ y3 N: r5 S0 c
if(sg(ListView1- >Items- > 8 s, b/ |6 ?# N
Item- >SubItems- >Text,n-1) > 
( k5 C; |2 K) e* e5 _$ P* s* Msg(ListView1- >Items- > 
& j) x8 u: X) N3 X. [Item[j]- >SubItems- >Text,n-1)) $ v6 F7 w+ \8 o: d
* W; A/ _* R* N0 {- B4 X
// ...以下从略 2 P* |" z$ p9 L+ J, k, t- N
 
+ q7 L& t) U: ?4 q9 O! J. T最后，删除临时的交换项目。 ( v6 Y' \: U6 z5 A2 f) ]' ?9 U0 T
ListView1- >Items- >Delete(m); 
4 u5 _$ K# v" P . L; V1 }! j$ @( _6 F) t
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 - i' Q( K/ K- ?9 x9 y4 B y
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 8 f5 `+ _, j2 B2 H1 _