查看: 8991|回复: 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- 
0 J& i" `" H2 o, ?$ p+ g0 A2 U8 V+ y; o>Caption进行，与其它列不同，所以要单独进行排序。 
; q: Q. z$ p; }/ |& _- P! a, g0 @if (n==0) ( v: O& A/ R, r* ^+ O4 K- E+ M
{ 
* S* J6 m4 Y" |- C" ffor(i=0;i< m-1;i++) 
3 w @. F+ R* \/ P2 [ h( \1 J/ }for(j=i+1;j< m;j++) 
if(od) ) F. H8 p# |0 ]
{ 
- P$ m" ~) s: G& c5 ?if(ListView1- >Items- >Item- >Caption > 3 ~/ V: b- ]/ L. y/ a
ListView1- >Items- >Item[j]- >Caption) % I( Q( q U5 u- c( |8 s$ S5 n) d
{ 
) O1 a4 s! y$ h s/ L/ q& kListView1- >Items- >Item[m]= 
 V3 u# F( T% o; QListView1- >Items- >Item; 
8 T9 l p+ y# {. v J5 j0 mListView1- >Items- >Item= 
/ f- s! x- L5 \0 [ListView1- >Items- >Item[j]; 
; k6 U' x \8 y8 `1 M0 _) A" ^ListView1- >Items- >Item[j]= 
6 D& {% z. K' N: D5 J+ ]ListView1- >Items- >Item[m]; 6 v+ N8 _- }- Z' O' V
} 
& ?4 m. d* c( W0 U- y, K6 L1 q} 
0 z' m6 X" b3 g# y. c0 _else 
$ D6 c7 ~3 F2 o. p% i! w& z1 P+ }6 [{ 
& @3 K3 g; y# O8 lif(ListView1- >Items- >Item- >Caption< 
+ U/ C$ r4 [! C% s6 Y& s4 PListView1- >Items- >Item[j]- >Caption) 0 K. s1 s: s0 N" @
{ 8 n$ l5 {' V" G* a- I- O
ListView1- >Items- >Item[m]= 
 m8 ?: p% M) s6 P/ R: u9 d; EListView1- >Items- >Item; 1 H. L. @. s! }% K o2 F
ListView1- >Items- >Item= 
& {9 r, J2 W* ~ListView1- >Items- >Item[j]; 1 }4 Y' ?! V2 k8 \0 m
ListView1- >Items- >Item[j]= 
0 X0 ~! N" T6 H, k* l: XListView1- >Items- >Item[m]; 
8 x0 F8 U; g' n) U} 
! j2 [2 A3 r: p: H+ w$ ~0 I} 1 W6 Q3 p, t- k4 |. d2 \
ListView1- >Items- >Delete(m); 
. g! ]6 T: A5 {) j+ rreturn; & q! _2 x& Y' J
} ) u1 }. |( P9 B% T$ [
 
$ n, E. a a% T: f2 G( a---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
8 @) I, C* ~/ J' Y& k>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
- [' h9 F! x8 J9 ]式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 ' Y/ F: w! `) I) l% `5 F
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 1 d, K1 E0 h0 R8 s7 P
ListView1ColumnClick前面即可。 
) e: z# L* ~+ b1 G4 R) _# s9 s, ~#include < vcl/dstring.h > 
5 } H, H; \: q- |; qAnsiString __stdcall sg(AnsiString str,int n) # h, `) R; c# b6 X- ^2 l
{ * o; ?" Z0 `, K; ^% c* r
int l,i; ' c, n& D C+ f5 D/ _9 ?
AnsiString qq(str); 
4 D0 I& e7 ^$ X0 |# S: y# bl=qq.Length(); : m& W9 B+ c3 Z) l! l
AnsiString p(str); . E3 L3 D0 E' N+ b. s& h' |) N; D
char a[]="\r\n"; 0 _+ D# I6 O" n+ J" K
int j=0,k=0; 
" g: j7 _0 ~, i. |+ ]) h8 Rfor(j=1;j< l;j++) 
3 N+ ^! M$ J2 s& H4 r: w" ~- L; a{ 0 P+ T9 B7 r- n+ P4 u
i=1; 
5 |, @5 F' l4 Y7 g \! swhile(qq[j]!=a[0] && qq[j+1]!=a[1]) ) x7 S0 L& Z# Z+ s# o8 J
{ 
' S) {8 r2 U3 m- dp[i++]=qq[j]; ! t* a1 ^7 G7 p2 o
j++; % }4 Y# j `4 n1 R
} ) f6 h5 T% S+ z! {' @
k++; 
8 k2 \0 Y! d5 C0 ~6 i# u7 [if((k-1)==n) 
" Y) q' y9 M/ O' i& U3 wbreak; 
( j* H$ @8 C1 l$ B- U& G, k} ^/ w6 E+ w& X7 G1 s
p=NULL; ) A6 ^6 v6 w7 r; o( i
return (p); 
; e$ ^7 w! A/ j9 ^4 u} ( q; H) J) `% L# X) m6 F
 * t% P2 s+ f1 T9 H+ B F
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
) M/ Z7 A% T9 V1 H/ n. o& ~: M# r>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 : p2 w& k. J4 I5 X
可完成对此项目的点击排序功能。 
: \% q9 _0 |7 B# p1 h) gfor(i=0;i< m-1;i++) 
& F6 S" C( {$ ~+ n u ?7 [4 mfor(j=i+1;j< m;j++) $ t, M2 X/ @8 {# O9 L
if(od) 
4 [1 J6 ~' a) c6 t{ 
7 v/ p3 e+ N L2 x8 _' Tif(sg(ListView1- >Items- > ) F- f( A3 C% u( g9 `
Item- >SubItems- >Text,n-1) > * e( ~& `, A2 J. a# Q0 u
sg(ListView1- >Items- > $ k& E' q/ K& Q$ H& t; ?
Item[j]- >SubItems- >Text,n-1)) 
- C2 A- C, \1 ~! w4 ]: C( g9 M$ k5 |
// ...以下从略 : y8 t; o! n# e; ~$ _! k2 e0 J" P
 9 ~4 d( n$ w- W1 l: ~
最后，删除临时的交换项目。 - P! X7 W4 f& m( s4 d
ListView1- >Items- >Delete(m); 
# {" ~" D A3 Y# ]7 [) G' W 8 L5 I9 Z* s2 m
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 7 A& Z: M7 F& a# R
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 1 g9 ~( Y E5 w- w( N5 ^- n