查看: 8979|回复: 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- 
3 B' q$ i' e* B# ~. A2 U>Caption进行，与其它列不同，所以要单独进行排序。 
* \, I) E5 F$ ^if (n==0) 
" u$ k8 x1 L |1 f{ * Y: v% u2 d5 ?4 z' K a2 c
for(i=0;i< m-1;i++) 
- F/ Q( r# F6 c6 f* Pfor(j=i+1;j< m;j++) 
' I1 a7 z& M& rif(od) 5 w. U0 w9 J! b& A
{ , m" B, t: l% ]; ^
if(ListView1- >Items- >Item- >Caption > $ ^% b9 W! W- X9 g
ListView1- >Items- >Item[j]- >Caption) 
. c1 C8 E& D+ F7 L- S u1 f{ 
' o+ B/ s! [+ R6 v* @: DListView1- >Items- >Item[m]= I4 t% h$ D: g2 i1 |
ListView1- >Items- >Item; 
% C" G4 R& a4 k. W/ Z+ gListView1- >Items- >Item= 
 v6 ~) f. f8 hListView1- >Items- >Item[j]; ' s5 V) f; m( C3 y8 k6 ?; C
ListView1- >Items- >Item[j]= 
( R0 W4 O/ C! |$ B0 x( C: O$ yListView1- >Items- >Item[m]; 1 E* Y: r2 x g+ L' `4 t
} 5 M8 N/ Q* Z3 g* F) S( }
} " |7 d3 \$ t/ {
else : q, ]$ f, E5 @! S9 N- e4 b
{ 
5 o8 A% s+ v& `0 i# yif(ListView1- >Items- >Item- >Caption< # B& X) Y. K, y; u% Q
ListView1- >Items- >Item[j]- >Caption) 
3 @1 s' T) n8 a2 O) a; d8 F, X" _{ $ c- j" K. ^/ M! p$ B2 F; O
ListView1- >Items- >Item[m]= 0 D1 I, H6 J- _
ListView1- >Items- >Item; ) x0 A( s$ O1 h/ {- b9 S& W+ @1 e7 H
ListView1- >Items- >Item= 
5 g' o3 v# t$ l. u' t7 x) IListView1- >Items- >Item[j]; 7 X% y. Q+ [% D& K8 L
ListView1- >Items- >Item[j]= " N3 e$ M7 `, ?9 I% Y
ListView1- >Items- >Item[m]; 
* v2 H, ~# _- n3 v! `1 C} 
2 p9 G7 g4 c8 P! a% r, g) c} 6 J5 H. X2 I2 ?5 ?4 H
ListView1- >Items- >Delete(m); + _8 I# H. \) d2 z& Q. U
return; 
+ g1 V, Z/ s- g/ A, ?} c& a1 { v' H- h$ J
 4 x& z( c) U! J9 M, ~+ v
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- / ]+ E T3 ?" I6 u+ d# S* p
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
* W" Y: B8 b: q4 u \式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 6 g( D) O. a+ @) v
子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
% H: N* d1 T$ r7 OListView1ColumnClick前面即可。 
) b0 [4 N0 g0 i! q# w#include < vcl/dstring.h > ) d! `) J7 h o9 U
AnsiString __stdcall sg(AnsiString str,int n) & }/ j5 z' A( G
{ 1 y% n, `9 n7 i u9 n r; I+ [
int l,i; 4 z) i. f3 Y' e7 m- j& d. q' X
AnsiString qq(str); 
! e+ j5 k5 N2 Q$ O }/ u* M; vl=qq.Length(); 
; s4 u3 z. k* ^9 }; KAnsiString p(str); ' Q& F# Z1 ]3 H2 U' ]6 |7 ?
char a[]="\r\n"; 
2 D) m! F6 n5 z/ hint j=0,k=0; ) h" U# G, `, X v1 u6 s
for(j=1;j< l;j++) 8 q4 F0 @5 M1 t Z* ]3 ]; X/ V
{ 
3 Q7 M4 q. }5 ji=1; 
* _5 o5 V0 ^5 B/ m: b7 H. }/ T6 Zwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) ( E w/ _7 v3 Y
{ 
* Z( M, S3 f% R f( g4 U! `p[i++]=qq[j]; 6 Q6 D( I0 `! {8 e1 G2 `
j++; 
, p9 P6 d6 x2 G1 ?3 k: v} 0 L" M5 c* u& _8 \
k++; 
3 O9 Y9 X5 j2 }% P5 ]* V# Jif((k-1)==n) 
7 z" m1 s# D M$ w# U& Zbreak; 
3 k; r5 i0 R2 `" C" P, r0 l" l! ~} 
+ m( `. F* W+ V. `p=NULL; ! j/ D3 p& y( f" ]' ~
return (p); 
: N( u* t5 c2 ^1 Y8 U5 b} 7 G1 F! \% Q( C8 s; X1 B
 ( s. ]* ^5 U, O: x& B+ O
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- " Z5 E+ u) ^5 ~4 V* g) ~
>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
1 A* r2 o9 h# A, z$ o可完成对此项目的点击排序功能。 % [2 u1 H* p: f
for(i=0;i< m-1;i++) ' n ^1 O0 O4 ?" ?$ s0 B6 o
for(j=i+1;j< m;j++) 
, \- p2 Z9 |1 @( J9 Aif(od) 
, L5 ^' m" m* M9 w% p1 y3 |1 k{ . g3 r+ ~2 l9 B5 p/ j
if(sg(ListView1- >Items- > 
2 O- Z+ V. h5 ?# O1 ` h% S- bItem- >SubItems- >Text,n-1) > 
0 K2 C! q9 j0 ^0 v( \) b, Fsg(ListView1- >Items- > 5 {; u8 d; [' T/ @9 Y7 [/ S/ V4 ?; M; ]
Item[j]- >SubItems- >Text,n-1)) 
3 K7 l/ _* x# J$ O6 M0 t
. ^1 u- C9 m. K( L; W0 p// ...以下从略 . C/ D( p4 V' r2 R1 o: X8 o2 w* C- `% D
 * H' S1 Y) j+ r' d
最后，删除临时的交换项目。 
! ~: x( e5 q8 E9 x7 x, L) |ListView1- >Items- >Delete(m); * U8 d7 K$ m3 V# ^8 }
 ! r& Q$ L T+ z8 t$ {
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 
) \% X# U" c" J/ u: b式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 ; E: \1 t {- e" e$ _1 ?5 B6 c