查看: 9006|回复: 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- 
* Z' q' f/ U" j6 z$ }>Caption进行，与其它列不同，所以要单独进行排序。 5 V6 ? ?; u6 p. _: r K1 h" @) J
if (n==0) 
: M5 a% o( l6 p) @( S3 S{ 5 x" F& V( i* u3 Q f
for(i=0;i< m-1;i++) 
- P; J. v) A# L r; R' ifor(j=i+1;j< m;j++) 
) F1 [- K b: c1 f4 oif(od) 
/ j7 t7 c* C( `/ b" J3 V; E3 e{ : @" m2 v/ s7 ?
if(ListView1- >Items- >Item- >Caption > ! R1 F$ B" d% o* ^3 }$ z* h
ListView1- >Items- >Item[j]- >Caption) 0 C _/ A5 S( w# J8 S) I) M
{ + M1 {7 }6 d: ~8 Z
ListView1- >Items- >Item[m]= 
; e. y0 ~" g4 u8 S% cListView1- >Items- >Item; i7 G4 L+ E- Q9 U+ |" u \) u
ListView1- >Items- >Item= 
) T% J. U. o' c% l) @ListView1- >Items- >Item[j]; 
+ l' J- L3 p1 k- B) b- U2 y, A, h) ^ListView1- >Items- >Item[j]= 7 i4 Z/ S2 T7 z
ListView1- >Items- >Item[m]; 
8 b0 T) k' v. X$ q} 
! F; a8 U; N* m" y' e @} , p) z3 m6 c3 r B
else 
8 s9 m' D$ H- Z{ ) S1 p9 ^4 h9 M* Z* u
if(ListView1- >Items- >Item- >Caption< 6 C) B( N$ ^+ a
ListView1- >Items- >Item[j]- >Caption) 
1 O" @+ C& C# Z# c# M{ 3 y/ g4 e9 ?* [5 L
ListView1- >Items- >Item[m]= 
' g$ n( x* y7 o5 h, `, m1 w Q( DListView1- >Items- >Item; 
+ e& H3 P+ e. C3 z1 [' Q) ?! G9 cListView1- >Items- >Item= 
1 K& X I! z) |) V; J! l, gListView1- >Items- >Item[j]; 3 e3 q: @0 f. x5 n, B
ListView1- >Items- >Item[j]= 
9 s1 @- \, Y. E0 x8 SListView1- >Items- >Item[m]; 
# v+ u; V9 g: ^4 e7 F0 ^% g} / I& q. ^' b6 L& [6 T* L6 |
} 6 E5 L/ Q# E7 K
ListView1- >Items- >Delete(m); 
2 C4 T. I( B- v2 B2 P+ a- I$ dreturn; ) i9 [4 T Q' F+ l" F$ |3 N( S8 |
} ! `, z3 |1 b! K! V' I+ Z8 k# f: z
 " Q3 T; n x' X# n8 \
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
 v I. \, I# x8 Y4 g" c>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
7 P5 p/ B* N$ Y式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
% s6 ` }9 [$ c8 i+ p子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
/ N" l1 S, b9 q7 t2 O. ]ListView1ColumnClick前面即可。 
4 r! B* \5 B0 g5 h#include < vcl/dstring.h > . w4 o4 E; [, e0 ?* b
AnsiString __stdcall sg(AnsiString str,int n) - y9 d9 c# n5 V4 a
{ - d; o6 e# }# k1 n9 j
int l,i; 
7 ^! i* P! d5 D; E* ^' z+ v, eAnsiString qq(str); 
6 e3 [: G: a: il=qq.Length(); ; Z7 K8 d/ k) m+ u
AnsiString p(str); 
* v8 z8 X1 J" _: [5 A% qchar a[]="\r\n"; 
4 b* S+ ~+ m2 vint j=0,k=0; 
# ~5 B' \9 m( Z0 N+ O2 |# lfor(j=1;j< l;j++) # |3 e6 L0 h; z9 g" e# _ s8 O
{ 1 s+ T2 `5 D/ Q0 G/ r0 S
i=1; ) {5 E& g. r% K+ l$ H
while(qq[j]!=a[0] && qq[j+1]!=a[1]) 
% }+ w I$ h( W{ - t8 K, O5 A7 p9 J4 r* U3 g' K3 I
p[i++]=qq[j]; 
/ e: ~* w% @3 q7 J8 \6 z% Sj++; 
6 [8 X9 _/ C* Y6 j} , m8 S/ j/ T6 q) w9 W/ B
k++; 
) Z. U3 Z* ^$ ]& z, a+ R4 E. k' k+ nif((k-1)==n) 
 ?' k* w% V' zbreak; 
 p/ k# X; e4 H$ s} 4 c- E3 Y K0 A* r2 i
p=NULL; ' b- `% b! i7 C* S
return (p); 
' C% L. j) T2 l3 {% D# V g} $ ?! ^9 }# Y6 Z2 f- U3 c6 N4 {7 V' y
 
. N9 `0 m3 o, Z: b" T, ^---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
, q* A+ z( T! A2 ^1 j1 Q V* M>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
5 a2 a4 W+ Q+ x7 h9 ]* T可完成对此项目的点击排序功能。 
9 x- \$ t9 q6 _: M( m0 t/ S0 [for(i=0;i< m-1;i++) 
5 [0 S8 l4 w9 P F& ^6 w7 wfor(j=i+1;j< m;j++) ) o+ e& G. Y! V! M$ M: m- a
if(od) : n4 V, `3 T# v i6 l9 k
{ $ z1 X6 L6 I& n A0 x
if(sg(ListView1- >Items- > 
6 [5 M+ _' v3 B& f% |Item- >SubItems- >Text,n-1) > 
+ N. g/ C7 P- j1 d N4 K+ lsg(ListView1- >Items- > 
, F/ n) H4 J+ M" gItem[j]- >SubItems- >Text,n-1)) 
, B( Z( ~* t2 } z
) V4 }. I) E3 S/ z( {3 _+ m7 \// ...以下从略 ) }2 {! h% n0 T5 ^+ T( K9 a3 k
 , ~4 u/ j @ w- [- r, O6 W
最后，删除临时的交换项目。 7 @, W9 |9 N; u& j' v# A4 p
ListView1- >Items- >Delete(m); % {' n: Z6 E/ p( D* p2 t7 j& @
 
+ E- E A4 K$ e( H8 ]---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
" R% I$ [ X) s6 D4 g式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
8 G; S( _+ M% V* J