查看: 9088|回复: 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- 
7 X! U. T8 a7 V z>Caption进行，与其它列不同，所以要单独进行排序。 2 G; z& H1 {3 d" q6 B" X
if (n==0) ) i. n7 @ M; v8 ~
{ 
) Y* L1 R, D& c% j" p4 h2 T/ ^for(i=0;i< m-1;i++) 
6 D; J: s. Q7 tfor(j=i+1;j< m;j++) 
7 R {( n! Q8 n8 S. gif(od) ; Y& d4 ]' y1 Q, i- |5 n5 E* q% P
{ 
6 G9 |" }( y Zif(ListView1- >Items- >Item- >Caption > # r% ]+ y& j' U, @5 U1 J
ListView1- >Items- >Item[j]- >Caption) ; j, h7 H8 w* f) o* @
{ 1 T+ f# U- ^" q( i- m
ListView1- >Items- >Item[m]= 
7 ]+ ^4 O/ _; [- ~- IListView1- >Items- >Item; ' D: a( ]! e6 q K7 t7 \1 h. q& c
ListView1- >Items- >Item= . J& ~( ?9 h& g
ListView1- >Items- >Item[j]; " R7 G. U( d4 p1 x
ListView1- >Items- >Item[j]= + E& W( a$ | l6 a9 O
ListView1- >Items- >Item[m]; 
" U2 m! F1 P. n7 |4 C8 r9 {} 
, J5 ]8 g* j" ^' w6 E} + g2 f. u9 \5 Z7 j% S, e; M8 A
else / n8 L0 ^/ q: Y' w- H) H4 c
{ 4 f' {: U" k& r0 A
if(ListView1- >Items- >Item- >Caption< 
8 J' Y6 H3 L2 r& Y4 D* }ListView1- >Items- >Item[j]- >Caption) 
2 {1 k1 A& M1 x$ S* v{ 
. F% y9 U' h# w* E# VListView1- >Items- >Item[m]= 
9 k4 e/ C+ G$ }4 QListView1- >Items- >Item; 
* T& a* P5 S1 t7 w) ZListView1- >Items- >Item= 
* e# c8 I1 W1 JListView1- >Items- >Item[j]; . u. J$ I$ B7 N* X. Y$ t% r2 ^* r
ListView1- >Items- >Item[j]= 
6 ]5 \+ K" R! X/ V: }$ Y( PListView1- >Items- >Item[m]; 
/ k7 n! ]: i5 b# I7 [5 d} 
' g2 \, \/ }/ V} 
* m3 @5 @0 S' L: y8 E6 gListView1- >Items- >Delete(m); # p0 i$ r, S& _3 X/ ]
return; 
. K/ ?. q0 Z3 K8 c1 o} 9 W1 ?9 ~0 ~5 D4 R, ?3 _
 
1 u1 \$ l6 ~! r0 R: O---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
2 T: Y+ p) w/ F! u* A& }' k. n2 o7 z>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 ! F' M% T$ D- u0 F; ?
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 ! ?' k4 o( \+ y; C+ X6 J
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
" Z1 b5 O% P S% ^% P6 o/ DListView1ColumnClick前面即可。 
/ e) R K! D. `& C5 c4 U" L" V4 V#include < vcl/dstring.h > % D: P: A6 \4 `
AnsiString __stdcall sg(AnsiString str,int n) 0 k5 A3 p# n9 j! k- ?3 n6 H) s
{ ! k0 y# w5 e5 V
int l,i; ) ~, \" e) D/ [
AnsiString qq(str); 
; X9 K5 p9 \6 e- ]! O4 Cl=qq.Length(); 0 N/ E6 L S/ g' Z( T. N5 L3 J
AnsiString p(str); ) \; m4 j: }8 d0 T7 [* I
char a[]="\r\n"; 
& @; i/ b, o: y+ ^int j=0,k=0; 8 R# E0 ` j) i6 s \
for(j=1;j< l;j++) q% t# [' T$ g- M% b
{ 5 |- M) R6 k% a2 F
i=1; 
$ Y6 _. l) w. P$ d6 \6 U% Bwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) + T! w8 _! t! S; |
{ , G( Q2 p; |9 j3 F- D
p[i++]=qq[j]; " [) w4 J# B9 z9 E
j++; ~+ t7 @$ ?8 D* C! z9 Y
} 4 _3 X2 V& ]! \! z. V
k++; 
! ^5 S( D" I) pif((k-1)==n) 
& U& ]8 ~5 ?9 J4 w9 Dbreak; 
( m4 H0 @4 U5 Z3 C' u, r$ O} % f! L; f. X1 [
p=NULL; 
; a: I" d" B, s8 i# b0 }! H! w8 Rreturn (p); 
6 \6 D' P! g" A8 k} 7 x; N$ [, q0 y' M2 u- p/ q* O! g
 " i6 n q1 Y* s/ ]: X: O
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- * ?" F3 y0 f$ \* M
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
- u7 M# p! _' {5 u2 T可完成对此项目的点击排序功能。 
" `, [+ Z: m3 W4 a. ]1 \/ ~for(i=0;i< m-1;i++) 2 P! s( v1 |( J! x: T9 k& O
for(j=i+1;j< m;j++) 7 b- ?, J# {2 c# U5 R
if(od) 
4 J0 n) d+ A3 B" Z0 t! l! F+ }{ 
& M- N5 m* H) W% W+ |7 aif(sg(ListView1- >Items- > $ G4 R+ D! M' d' f2 q% i% x
Item- >SubItems- >Text,n-1) > 
2 D3 a1 q5 s) M! R$ [1 R# J9 vsg(ListView1- >Items- > 
; i9 Y& |3 g! N8 [7 AItem[j]- >SubItems- >Text,n-1)) 
' @2 H& a( Z/ O/ |/ B
// ...以下从略 
6 J1 J1 X. r4 a& _3 T. @) W' S 
. E, Z% M7 G: w5 x0 R最后，删除临时的交换项目。 
3 R* X/ W; I8 L5 u2 P: o- yListView1- >Items- >Delete(m); & e% b' I# p- z% g2 x
 ) K4 o5 @3 o+ b7 G! j
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 ' v/ [0 b5 b1 f) v' I
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
% s3 i3 K8 X* i+ O7 D1 M2 o