查看: 8633|回复: 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- 
5 t( ~5 A4 Q; W) }1 u% L# m) T>Caption进行，与其它列不同，所以要单独进行排序。 
' W/ G3 Q! h! H$ Z; ]8 G1 U% c7 Xif (n==0) 
8 J* N3 \# S/ Q6 y0 C" d0 ~{ / E" E& N: g% L; _
for(i=0;i< m-1;i++) . S4 [! N( j/ L9 ^% ]
for(j=i+1;j< m;j++) " j' [+ C/ D5 i
if(od) 
+ R3 D% Y2 [2 n: B3 f{ 
* [( ^. z3 Q! aif(ListView1- >Items- >Item- >Caption > 
& k z* M/ A/ X7 B4 ^ListView1- >Items- >Item[j]- >Caption) 
8 w: p( T/ v1 h{ 
# p4 g; Y4 H, N* L K) \3 NListView1- >Items- >Item[m]= 
 U# \3 g9 N( |ListView1- >Items- >Item; 
1 z# X4 m+ s$ C$ iListView1- >Items- >Item= 
1 j" K. U8 b4 B1 x0 lListView1- >Items- >Item[j]; 
. p. c% Z- }' N7 w; F. B. }ListView1- >Items- >Item[j]= " O. s. B, R( R
ListView1- >Items- >Item[m]; ) H9 K( L' m! D7 d5 r- Q
} 
" x b2 s" q7 C5 q- G) H# b} 
1 A& D! L: {1 y# delse 
7 p- O# b9 K# O) M& [/ c{ 6 `8 W' w, i; A" }3 {
if(ListView1- >Items- >Item- >Caption< 
4 D' P. [, }0 T5 h+ a" F8 MListView1- >Items- >Item[j]- >Caption) 
) \2 T- @6 T: i3 K6 A t* t P{ 3 P6 B/ p+ p5 r2 c9 d
ListView1- >Items- >Item[m]= 
+ A: ]% Y$ s1 n+ k; [ListView1- >Items- >Item; ( A5 i i8 K% U$ o& }( d4 k3 e8 r+ w
ListView1- >Items- >Item= ; |* c2 B! |' Q; h8 z$ ]
ListView1- >Items- >Item[j]; 
! o# c- E7 H& F5 PListView1- >Items- >Item[j]= 
2 }4 C) e- w! a. E9 d8 OListView1- >Items- >Item[m]; 
9 j3 }. P4 Q2 z- f# c6 s' i* u/ G} 
# Y0 M1 p! O% C) p6 H6 U+ e} 
! M4 l( `& o1 f% j0 FListView1- >Items- >Delete(m); " J0 H( \' t1 o" G& b% M
return; 
1 I# D) Y$ z& |8 f. O5 I; @} % O) [% e; F/ ^" K' a
 & u+ u- y5 I$ R- ?' _! |7 {; ?
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
: n y) ?' D+ r>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
% @9 I, D; @4 H/ O1 e式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
- j4 i0 O7 j3 w9 x+ P" l8 X, L. h子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
5 n; B/ a4 i, V, F% r2 lListView1ColumnClick前面即可。 
6 h$ V: t: S$ q#include < vcl/dstring.h > 
$ [" D2 b$ V2 b, G+ y; J/ P& }AnsiString __stdcall sg(AnsiString str,int n) 
! r& m/ p) `* W/ m' w{ 
, E7 I& S; \# fint l,i; 
3 {( @, s! l w, }AnsiString qq(str); ) h9 \3 p! {- t" Q) q5 p% |4 k; q
l=qq.Length(); 0 Q$ X- `/ s( s) E o
AnsiString p(str); 
$ {7 n5 F7 k3 V; w( rchar a[]="\r\n"; 
! J) y: t- e3 A+ X9 N0 b; Rint j=0,k=0; 0 x6 W9 d5 R" Y
for(j=1;j< l;j++) 9 S- A/ F; r( X4 f8 h
{ 
( a; a5 c ]6 t+ ?5 W5 Ni=1; 
* c5 m1 D3 h$ J4 u9 Pwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) / {( o7 o" P7 K3 e( f
{ , v& k8 Z) H( x: ^
p[i++]=qq[j]; ' b5 B |$ s' @# ~$ z; r( O, k6 k
j++; : K+ k$ X6 w$ v* R& H* i( Z2 _
} 4 e& S3 e: [! a. z6 u
k++; 
: B7 R& m; H) \: C5 Yif((k-1)==n) 
# d! c/ O# E% Z# u+ o7 }: E2 ]break; 
& W1 m% a& ]- X B3 |8 E4 k1 ^} 4 g! j" X! W; c$ R
p=NULL; 
/ {, m( h6 v) Vreturn (p); ( `/ D: ?& q( A) J9 W! |
} 
, M4 t5 s2 R6 a4 e% j- X3 `8 X$ | 
% t. X$ {& l$ B) _# K$ Y---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- ( i0 r$ r8 c: p: w2 x8 h
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
; e( X+ j* O) [. G可完成对此项目的点击排序功能。 * S T& N, c& c* U+ U B
for(i=0;i< m-1;i++) , V8 \" e, y i& \) r9 k
for(j=i+1;j< m;j++) i' s# | A' Z2 Q9 d, r
if(od) 
3 _& b2 _7 { a& G$ z1 v4 e) z' A4 R{ 
8 E$ k& V; N( k0 f9 ?if(sg(ListView1- >Items- > - Z9 q. G1 o5 }. Q/ O
Item- >SubItems- >Text,n-1) > 
, V$ N: m0 X) v$ \9 ^+ Wsg(ListView1- >Items- > 
5 d$ [8 t* Z4 [, D; ]Item[j]- >SubItems- >Text,n-1)) ) X" \/ {. n u6 l' [

& `4 p/ H- u. M) `' H( O9 K# l// ...以下从略 / _( K5 |' t6 \9 p4 J8 _: B
 , p+ b' S0 k0 }/ o2 l
最后，删除临时的交换项目。 & a/ F3 k1 M0 G" u ~( @
ListView1- >Items- >Delete(m); 5 j5 d3 W8 n# h6 a J
 1 Q8 R9 J& @6 c5 N* D1 K3 n
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
# ]* W' t2 [5 f7 ]式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 $ ?. v/ q# G d3 y