查看: 9021|回复: 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- 
1 |5 @# K; h* L+ {% X9 K>Caption进行，与其它列不同，所以要单独进行排序。 
2 ]7 O3 K8 _. Z eif (n==0) p i5 o- f" R% a4 F, \- J
{ ; X& ~% g1 q* T/ k& T. I
for(i=0;i< m-1;i++) $ S' _9 G# `/ ^/ }2 P
for(j=i+1;j< m;j++) ! i0 q: Y# w' t. \( S0 ? r
if(od) , _5 t0 K/ p) E; M5 ]- s
{ 
, A4 t% I' J5 Yif(ListView1- >Items- >Item- >Caption > - B# A7 k8 j# _: Q0 {0 B+ `
ListView1- >Items- >Item[j]- >Caption) 
/ G0 P |+ ]- ]5 S{ 9 a8 G! V/ |: [0 i6 [$ J- } F
ListView1- >Items- >Item[m]= 9 u& y9 [; T2 J" E9 T2 o0 i9 ]
ListView1- >Items- >Item; - u6 U2 ]& @( v- ^; I+ m
ListView1- >Items- >Item= 
; F8 O6 |4 ~# B; H& ]ListView1- >Items- >Item[j]; 1 `8 k& {6 ?" Q/ m/ j7 |
ListView1- >Items- >Item[j]= ) }( J% S4 N1 X6 K$ w
ListView1- >Items- >Item[m]; 
" x# V, X) C/ @( @4 }} 
8 Q; c" A* ?9 C( @4 z, y} 
. k7 W5 H) s* eelse 
% `% P# c$ M& @0 j+ o{ 7 G) M2 Z* \( ]0 m2 \! N
if(ListView1- >Items- >Item- >Caption< 
* r7 P& S d. [ListView1- >Items- >Item[j]- >Caption) 
 L$ J: S8 b( I [% ~{ 7 b5 i" d' s" ]5 _) l
ListView1- >Items- >Item[m]= 
9 M# \+ T% E$ z5 `8 p7 \ListView1- >Items- >Item; 
- n" j$ n$ W5 J. n% G7 E5 yListView1- >Items- >Item= 
" Q) G/ N: e& s, B0 ~ListView1- >Items- >Item[j]; 
, _* N( J! \/ pListView1- >Items- >Item[j]= 
1 U0 K6 I4 |! _4 B; C; S! {ListView1- >Items- >Item[m]; ! |, q# i1 f Y3 l: c
} 
" x3 }" x8 Z# z/ O! j} 
4 Q8 R7 Z& H- ]% u OListView1- >Items- >Delete(m); 
# h$ a% e S5 Freturn; / i/ l7 T2 |. K, ^* O. R( r
} 5 j1 i6 t8 L {$ N
 " K1 {( }( O) ?4 c! d( G- h
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
, I7 d6 M8 Q. `9 z4 |' Y! ^>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
; ?' s( n; m3 x2 w7 I式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 # d ]: @" y' s8 t
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 4 A: f3 _6 L2 m/ n& K+ @: ?9 Y
ListView1ColumnClick前面即可。 2 G- w s4 ]( V
#include < vcl/dstring.h > 
1 v6 L8 e, Q" U, e) S2 I( @AnsiString __stdcall sg(AnsiString str,int n) * ]" B2 R6 X7 D6 J
{ ' l' O; I0 G/ E/ V/ g
int l,i; 
& a. f% d! q5 N$ l6 CAnsiString qq(str); 
$ n( ?5 W% s H$ a+ i% el=qq.Length(); 
: ]# z- n7 h/ }$ @8 s" YAnsiString p(str); 
0 \& v, |8 ]/ m& F5 k1 Ychar a[]="\r\n"; 
* g' t. |. h7 U( a' R, iint j=0,k=0; 
( c" }% W, v* Y& jfor(j=1;j< l;j++) 
8 O m" C0 q2 g' w8 {" z0 |, S$ j# z{ , _& T B" u& O3 [
i=1; 
3 [* ^0 u& S! c; R+ c6 mwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) 
+ l% C5 t7 t1 N- C4 C{ 
! ?! r Q5 }4 r" G [; b/ dp[i++]=qq[j]; 8 M- ?& D0 A: q9 p' l8 n
j++; 
3 V- }+ b% U$ h+ ?& h2 v} 
" s/ h3 g& b r* k1 @% @! dk++; - L4 v2 H* N: _7 F5 y" G
if((k-1)==n) 
' ?' [5 c) F' d7 N) q7 O6 ~& Lbreak; 0 n- }: K+ F# }8 C. ^$ w
} ! j% x$ @) r7 r( i; p
p=NULL; 2 x& x( ]8 ~; x5 _* p; Q
return (p); 
- _3 v/ p" T. f! V" B D: K} 
* Q% P" d/ { N8 ]' i& ^$ _ 7 A& |( |4 s( I! O2 `
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- % R% H0 C. H! k1 V# K6 @
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
* j! B5 D. h; _$ Q/ c3 U可完成对此项目的点击排序功能。 , J* i5 j. v1 }/ d4 B$ D9 |( G
for(i=0;i< m-1;i++) 
2 \5 x; G6 G& S2 Zfor(j=i+1;j< m;j++) . {# J# o! l' S+ F
if(od) % [2 ~5 u9 k! C
{ 
" l9 L* }) f+ Q. N% t. k" c5 {if(sg(ListView1- >Items- > 
& [* u ?. m8 H, C: E9 a- p2 ~8 v4 bItem- >SubItems- >Text,n-1) > 
9 h1 m+ V7 C5 ?+ W: Osg(ListView1- >Items- > 
) r/ m, D. l4 NItem[j]- >SubItems- >Text,n-1)) 
$ A: x+ d' r: v3 Z# W% \# R0 ~7 R7 v' j9 j9 F; M8 ]2 t
// ...以下从略 ! w+ g6 A# n' b* Y8 U
 
3 p' _3 l! D$ M* m, E0 E# ]* Z9 T最后，删除临时的交换项目。 
$ M' D/ h# |0 ^: `1 z3 m9 w7 tListView1- >Items- >Delete(m); 
$ P: y+ o0 M. N& K/ h- \ 
 h: `- H6 k& D5 Z2 l. |1 V---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 4 m/ {7 r5 s D$ B$ b A
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
) X2 ^; |" N# k