查看: 8634|回复: 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- 
$ T9 {* h/ N" p. q' }% ]>Caption进行，与其它列不同，所以要单独进行排序。 Z" C6 E) b4 e# u( G4 u0 X& n
if (n==0) 1 R. |: F: W# r
{ 
: V- T6 ^) a$ Z3 K( p$ |0 ^for(i=0;i< m-1;i++) 
# ` o1 N Z) Z& zfor(j=i+1;j< m;j++) 
7 t; _5 }4 b# |0 c4 O" bif(od) 
' n# A" B/ ?( h+ P! p{ 
: [; r0 i$ W* B; |if(ListView1- >Items- >Item- >Caption > 4 O5 O5 E+ B; L" ]7 N
ListView1- >Items- >Item[j]- >Caption) 
6 _/ Q3 I( n% b! V! Z, M* n{ ! Z! R \1 P- n. h0 n* c; U
ListView1- >Items- >Item[m]= 
& c+ @$ s7 T2 E# TListView1- >Items- >Item; 2 G9 ^9 i1 H% b0 Y& s
ListView1- >Items- >Item= 
5 v. D' l2 m. x! z! nListView1- >Items- >Item[j]; 
6 k2 M; D( b8 j9 Z U- Y SListView1- >Items- >Item[j]= V/ V+ v* R6 I- g" e3 J
ListView1- >Items- >Item[m]; ( ?5 k j% L3 c6 j. Q- T) `
} % i' J3 s0 k( {6 j) {- X/ d* ^
} # e: I4 k$ V5 g& S& k! p* G
else 
8 i k( C! V6 ~& T2 J! l{ 
) g) F1 Z" l( T7 d6 @+ vif(ListView1- >Items- >Item- >Caption< / {1 k |- d: B2 r( m+ B
ListView1- >Items- >Item[j]- >Caption) 4 |1 m1 e" V2 ~, n! S6 [
{ 
6 W* l& p) b( v5 Q8 G- UListView1- >Items- >Item[m]= 
: U- q3 M R4 y; j# v! U+ O% tListView1- >Items- >Item; 3 r' [! A) a% \* ^0 U( u, D
ListView1- >Items- >Item= 
& w$ m# p! l* a7 W5 |ListView1- >Items- >Item[j]; 
0 `# M3 L/ ?/ |# a) e; s$ ZListView1- >Items- >Item[j]= 
+ B8 u# O' K/ r6 s8 b3 U4 a$ P) VListView1- >Items- >Item[m]; 
, e! \( u, k6 ?! c} . q+ J' m H: ^1 {: S# L: a( Y
} 
- D/ N9 V/ d4 ~5 `- s# EListView1- >Items- >Delete(m); 
' t# p2 J+ ~+ |8 _& p3 _return; 1 |; N4 F. q5 v" r! C& p; K
} 
5 D" p) l0 b R ) v* P. I& |% R) k i7 z
---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- 
9 \4 X3 C( h3 }9 W5 m5 D+ Y>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 
4 f' `. l |! B, L# n* ~' i式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
8 J+ c I) t* c* ]子项目，需编写如下函数,并将其放于void __fastcall TForm1:: : c5 k, ~, G6 p
ListView1ColumnClick前面即可。 
# B' x v: p2 x" N* Z#include < vcl/dstring.h > " s1 _. K: k8 \% ?+ o7 k
AnsiString __stdcall sg(AnsiString str,int n) 
1 Q1 |- u4 l+ b" i% `{ 
. g6 k8 ?3 i; D4 m2 hint l,i; 9 e$ e2 d, `2 g8 z+ K
AnsiString qq(str); 
& F9 t9 J! n2 Al=qq.Length(); ; b9 }" n( T7 F' c s6 j
AnsiString p(str); % w: E, |. a7 [( ~& ^
char a[]="\r\n"; 
0 h" n1 X- U- r& N8 X. ~int j=0,k=0; f9 s1 h- [, b
for(j=1;j< l;j++) 0 h. F: H/ w$ K9 T7 d* V$ y
{ 8 Y v# H7 T; J1 A8 y. d7 Q
i=1; 
. q+ s8 L) x4 T9 ~4 S( |1 Mwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) " ?4 N) v$ f& \+ t1 z; J. x
{ / {5 B' j. J$ {& N. G
p[i++]=qq[j]; 1 Y; s# ^7 ]6 }& ~
j++; 
; B* F: D: {( X5 g: I8 [} 
5 Y+ h4 Y2 r' H) c. c. L" Z5 |k++; 
( i3 n* e$ @* N( p) M. C' u" xif((k-1)==n) 
 l0 U1 h: v J- A" a: Qbreak; , n) e) ^9 |8 G/ A, d2 R" G% |
} 
& E2 Q: I/ ]& X1 S8 H/ x( }- _p=NULL; ; \5 t+ I" S& b' S9 f: X, X
return (p); ! T6 j: e) L+ h4 P, X1 V7 k- Z. _* r
} 
' ?6 V# I0 q3 m! ~3 I; L- _ a/ G/ ]+ j0 z7 K! |0 \7 Z
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
% y) Z1 I- g9 ^% h+ y( c>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 
9 [0 O# r1 Q8 n' }& M可完成对此项目的点击排序功能。 
; e# u5 X/ z0 w9 P9 f2 h- i9 ofor(i=0;i< m-1;i++) ; f- T5 q; @9 I. \/ X* P
for(j=i+1;j< m;j++) 
0 k2 ~; n; ~, nif(od) 
/ ]9 k8 V/ {7 x: K! {% f2 h+ k" Z{ 2 [2 Q/ ?* w$ |) {6 {9 ~4 s
if(sg(ListView1- >Items- > 
8 t0 s0 L( [' E, CItem- >SubItems- >Text,n-1) > 
 c4 x7 _* Q+ O. D' }' {sg(ListView1- >Items- > b+ F6 m, P9 L0 \% r3 K; Q
Item[j]- >SubItems- >Text,n-1)) 
' I1 ?* J, t7 v- M) A, P1 J! t
: i0 m s; G# `' \- y( `$ A// ...以下从略 
9 w6 U9 Y {: w" W: _ 
1 M. R' J+ O# c# \" d l6 U/ g最后，删除临时的交换项目。 ! G; H s: ?" Z" b B
ListView1- >Items- >Delete(m); 9 l% k# l/ K0 R0 [
 ; I4 r9 o& N1 S
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 8 k2 `; o3 q) t2 R6 c
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
3 E9 C1 r/ H i. }) z9 r; Y