查看: 8944|回复: 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- 
- Y7 s8 K7 m x- X( w4 T>Caption进行，与其它列不同，所以要单独进行排序。 
3 Y$ e$ l3 S) Tif (n==0) 6 |4 I7 i* a2 E/ m3 o2 g4 x
{ 
) {$ R( l; y+ U: h# Ufor(i=0;i< m-1;i++) 
5 n4 Y" Q/ T; h6 l5 q/ z, h& wfor(j=i+1;j< m;j++) ! _7 ]9 o {' |' n! H
if(od) 4 A) N9 a2 Z' a' @1 g) Z
{ 0 {4 d2 c$ O, F6 J7 |, Y# U
if(ListView1- >Items- >Item- >Caption > 
: y. \$ ~, P" m6 VListView1- >Items- >Item[j]- >Caption) ! O0 m+ q$ `' |2 o' X9 t
{ 3 J0 W8 W1 L' w8 W7 U: U' ]6 r
ListView1- >Items- >Item[m]= 
: W/ V5 _) C3 r! u$ MListView1- >Items- >Item; 
$ z) u- g/ W# R& m# g& ?ListView1- >Items- >Item= 
9 f0 v5 o: P$ N6 {; VListView1- >Items- >Item[j]; 
$ d! G% \+ R9 k, c" ~ListView1- >Items- >Item[j]= 
8 q+ _* c2 ^( Y8 {ListView1- >Items- >Item[m]; . R! N0 |" C5 @ h! X
} ' E9 \9 j7 N0 Z' y5 w' ~
} 
5 V7 ? N% N" u# a- C; T5 zelse 8 [7 L* T* I0 B5 N# L
{ 
' M' Z$ B; O6 w# Y4 a7 _4 t6 E6 ]if(ListView1- >Items- >Item- >Caption< 
. }7 ~8 e9 s4 H1 f1 a6 lListView1- >Items- >Item[j]- >Caption) $ @; e7 }7 y7 A9 r+ _% m/ y
{ 4 X, L; ]1 f0 O; J: Y% ?' r
ListView1- >Items- >Item[m]= M, O! E8 i$ q( P7 p
ListView1- >Items- >Item; 1 z: X% w w8 A. C j" x$ M
ListView1- >Items- >Item= 4 T2 H4 i) D$ [( g# H1 ?! J
ListView1- >Items- >Item[j]; + _) [( g* _- ]- Y
ListView1- >Items- >Item[j]= 
+ F# s# a( t7 [ListView1- >Items- >Item[m]; 
" r4 g) l4 w9 @) H3 f9 M- s! A0 P} 
* C2 Z/ L$ A6 a7 @} 8 j8 {# K; Q0 Y$ t( `
ListView1- >Items- >Delete(m); ! w2 T+ z- p0 Q% R3 C+ e; u8 W- c9 T
return; $ v$ h# d8 m; k1 S/ W: Y
} 6 A( T a1 P' z. h. Z
 
* q) a9 V% w$ t7 P, r---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- - t4 }6 \: A3 L$ Z. @6 |8 d" k
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
5 A1 `. K1 L9 M9 `4 R9 e式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
0 {+ A+ G: w* R子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
6 F: ~/ D2 ?' D! N! ?5 P7 KListView1ColumnClick前面即可。 " B. F1 a! z6 L
#include < vcl/dstring.h > 
; l9 i# A, m5 F. B) n" xAnsiString __stdcall sg(AnsiString str,int n) 
1 D5 O% }- w# z9 k{ / i' ] O; C! u" R7 D; I4 J" f
int l,i; + ?5 U7 x5 E' v$ |
AnsiString qq(str); / b- d9 M* y6 V0 l1 H5 e1 N
l=qq.Length(); 9 b& A! d& H/ K9 Z2 `9 I1 {
AnsiString p(str); ( X! i+ d( b% ~9 J
char a[]="\r\n"; 
$ Q* F4 o8 o" a( V6 Y& I6 Mint j=0,k=0; 
6 q* }* f' `4 ]for(j=1;j< l;j++) ! T( c: _8 m/ k9 i" B# N
{ 
2 W5 J7 p# C( K/ P ai=1; ; G5 S1 m" U6 ~
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
5 q9 k' Y4 y& [{ 
8 v6 {4 Y0 A% i4 dp[i++]=qq[j]; + G Q- Q9 A- x7 E0 u
j++; 0 [2 ]. ?" c, d
} 
- e3 R; I- d( s4 b6 N* D# F q9 Ik++; 2 O6 f# U }$ b4 C n: ~9 f, U
if((k-1)==n) 
% z" `: X2 V+ C5 i( Fbreak; 4 k4 e3 n, J& o/ C% w+ j. r
} 9 o0 b( a+ ? e
p=NULL; 
; ~$ N: d( z2 H/ J2 Rreturn (p); " p% F9 T% D# j- i& X; |2 d
} 
* G; V* E0 c- C% P& Y* q( M9 e 5 S' j( D( ?4 [
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 6 a$ ~- B4 F) Y( y
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
! X& X+ \/ V! A9 o可完成对此项目的点击排序功能。 3 ] Z3 F/ u1 L$ X; s
for(i=0;i< m-1;i++) 
( E/ ~4 W4 y) [0 R" Lfor(j=i+1;j< m;j++) ' D) h) L9 _: q6 g% \5 V9 B
if(od) 
 M( _# V5 X# @$ q6 _{ 
( Y5 g% L0 I1 X6 u, U2 V+ k( j: nif(sg(ListView1- >Items- > 
* i7 W( t k+ A% U9 u( k3 XItem- >SubItems- >Text,n-1) > 
2 y& [! ]* d9 a7 P' V$ ]0 tsg(ListView1- >Items- > 9 f- W3 |5 W8 }) a; e5 `" J
Item[j]- >SubItems- >Text,n-1)) 4 }) t. I( P$ ?( G# e
# Y3 R$ O: m1 t4 O; S B
// ...以下从略 9 h! r, p2 V* p
 ! x" O3 x# h8 L4 F! ^
最后，删除临时的交换项目。 7 l! ~; u' U6 B7 M. @' \" I4 R
ListView1- >Items- >Delete(m); 
5 J& ~" _- e g+ u 
1 s# Z9 a- t" R. d/ i# |( v5 n. @6 Q---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 0 S8 c7 b6 G: k# o0 X8 f
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
6 ^# v" m$ T: ~$ A