查看: 8536|回复: 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- 
: U, x; T+ H. q>Caption进行，与其它列不同，所以要单独进行排序。 4 C$ B1 k( O) T
if (n==0) - H* I( p/ @; S4 t( p: c$ y
{ $ o! z |$ W( Q3 g4 {
for(i=0;i< m-1;i++) 
9 W7 w! l! k0 O& W) g. o" v rfor(j=i+1;j< m;j++) 
& f! T/ n i2 `: v% N+ V8 {9 Rif(od) U( j; k; C% n; Z4 o- G
{ 
3 o- ~5 K/ ]" L e" nif(ListView1- >Items- >Item- >Caption > + a; n, z" v# w, B& O
ListView1- >Items- >Item[j]- >Caption) 
' M! j$ [: F- ^" l2 K# F{ 
+ [5 |4 ~# w& {& T" WListView1- >Items- >Item[m]= % a! ^8 `. B, H* i
ListView1- >Items- >Item; ; W* S3 l- J! h3 O
ListView1- >Items- >Item= + Q. F8 I( d* b5 k4 _0 p7 A
ListView1- >Items- >Item[j]; 
# H5 l( i' N3 V/ X2 w# l2 Z/ w8 [ListView1- >Items- >Item[j]= 
7 G2 P O. O; c( M8 u9 LListView1- >Items- >Item[m]; ; M* Z( o7 p0 { j/ p% ~. _0 o
} 8 x" @9 X- G. b& i. Q
} 
! q/ a) V- y" g. S' @5 kelse 
5 B s3 f" `; A: f6 c3 U% |6 C) n% O{ 
4 @$ t3 }4 ?+ O8 g5 L( Y4 e. Eif(ListView1- >Items- >Item- >Caption< 
, d2 p" k0 d4 b8 dListView1- >Items- >Item[j]- >Caption) ( [, l. m, r: {' z& ]5 G1 u7 u
{ 
0 C# K7 j0 e" X# gListView1- >Items- >Item[m]= 
& N& |) O' D6 [# x2 {& C3 cListView1- >Items- >Item; 7 I& V. X2 a7 z4 R3 q$ l; J( X
ListView1- >Items- >Item= 
" [) d& O K9 r0 l. d6 N: mListView1- >Items- >Item[j]; 
 M o/ Y+ l0 ]: Q- v5 j" ]( eListView1- >Items- >Item[j]= 8 |5 `) e0 L& F7 ]9 K
ListView1- >Items- >Item[m]; 
" s; l% ]% W! Q0 T0 b4 o4 j3 {} 
- q$ y3 `) U0 K} % O: }: @( S8 `+ X6 A& ?" D
ListView1- >Items- >Delete(m); ( h( \4 c& |1 y; g3 N+ O/ m
return; 9 p; {% M! ?3 ]) g s$ x+ x% l
} $ b9 R2 t0 \4 P8 d; M6 ]5 S
 3 T( T5 g' y2 R) C J8 j
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- # m) W" v5 y8 O. |- Z( m
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 4 P4 p6 j0 b2 I/ W5 g# m
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 ; O J# U7 @) m! l
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: + _/ f9 K- A. `4 e
ListView1ColumnClick前面即可。 7 L! j* E: W: V1 D! T) p
#include < vcl/dstring.h > " M+ }! h/ ~' D4 ]9 M
AnsiString __stdcall sg(AnsiString str,int n) 
7 ?& }) q, b$ V) V: g+ `' i{ ; ?& A3 e5 F0 v0 q! y0 B% p
int l,i; % L- O& C. P3 f( r( K. n* [% p
AnsiString qq(str); 
- J$ P% x, t4 {6 `l=qq.Length(); 
* L' g+ ]) c, y1 C% FAnsiString p(str); 
4 {: q3 Y( j6 p& z. V" D+ b- C, dchar a[]="\r\n"; 3 F& S+ y ^2 A
int j=0,k=0; 
, h0 n, o U: i, }for(j=1;j< l;j++) 
( D! ~) X s5 `6 n{ 7 { O2 Y; F" B' O |% i4 H/ r
i=1; + J- C" z" M/ L1 H9 Z! E- U
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
7 h+ ?2 F/ m9 K! X{ * M4 Q2 d4 f1 w* q, E4 @7 ]
p[i++]=qq[j]; - ?6 ^- e) e( K; V3 K
j++; ) r, u8 {+ z7 W* N8 S
} 6 `' J# l1 l o- J! _" E
k++; 
6 Y( @' ]! ~+ k: Q! B: gif((k-1)==n) 
' g7 B; T3 M p+ g/ t6 I, G$ B" bbreak; 
. g8 `( ?2 V% l) y6 Z8 c' d} : E7 ~' z6 ^3 Z2 y1 I
p=NULL; 
- Z) t- I4 ~/ Greturn (p); 
* }& {/ d" c9 f% l! X2 `; P} * K& _1 O' g6 D" o$ |6 u
 
" E- k q6 L- @# Z) m$ t& C( W# j---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- ' t E( r- v4 q. m: J
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
! d' [9 x1 M# U8 a2 K& B4 ?5 U) ^可完成对此项目的点击排序功能。 9 Z7 r! }1 o! n
for(i=0;i< m-1;i++) : d4 m3 W2 a6 j' ?
for(j=i+1;j< m;j++) 
, Z1 o) H7 Q o7 z1 }if(od) / e; ~4 T0 Q+ b7 x) O: t% H) T$ v
{ 1 C) o& V( M6 ?: e
if(sg(ListView1- >Items- > 
: Y6 |1 |3 S2 B$ R4 W1 WItem- >SubItems- >Text,n-1) > 
# ^ `% P0 n1 ?( b) fsg(ListView1- >Items- > 
# I& r7 @8 l! ~. h( G7 jItem[j]- >SubItems- >Text,n-1)) 
, q, g* T: q r% z
' @+ A3 b$ Q2 U// ...以下从略 
3 G& n2 B" S# D7 p7 T1 M1 n, S 
" V8 F- J" i2 _% c/ G- u8 `最后，删除临时的交换项目。 * W* _6 T8 ~- G
ListView1- >Items- >Delete(m); % h8 R2 e' W" x* F: @. M: G
 " ?5 f* O. ?: x% w. @
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 0 v9 b4 [$ P$ H) A _6 h& x1 A+ W3 u- x
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
9 \7 O h7 z% y) a