数学建模社区-数学中国

标题: 在C++Builder中实现ListView的列标头点击排序功能 [打印本页]

作者: 韩冰 时间: 2005-1-26 12:28
标题: 在C++Builder中实现ListView的列标头点击排序功能
<

> 
<

>天津大学电子与信息工程学院 
<

>宋天宁 
<

>---- 列表框控件在应用程序中的使用率很高，在Ｗｉｎｄｏｗｓ中经常见到， 
<

>它有四种常见的式样，分别具有显示大图标,小目标，含有图标的多列列表，含 
<

>有列标头的列表。我们也经常见到一些扩展功能，例如我们在资源管理器中的文 
<

>件列表框中，在选用详细资料察看时，用鼠标单击列标头,如大小，则所列文件 
<

>按大小排序;单机日期，则按文件日期进行排序.这一功能增强了应用程序的可用 
<

>性，使操作更直观、方便。笔者在以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- ! S' s: V! l; y) m! u, R
>Caption进行，与其它列不同，所以要单独进行排序。 
* H o3 W5 W! z( E fif (n==0) 
* u ^1 P9 G/ d* A4 c0 ~! c% p{ % _! L1 H& }, x) E4 f: c9 p
for(i=0;i< m-1;i++) . ^4 ]; T: x; F1 p0 ?/ R6 ` l( M
for(j=i+1;j< m;j++) 1 g+ H# e) Z& X, ]5 K* d) a
if(od) ' t4 n% X _! I+ L7 h- d4 e
{ , H, J2 \- \5 N3 C# d
if(ListView1- >Items- >Item- >Caption > 
& L3 N( C8 V+ x8 l+ hListView1- >Items- >Item[j]- >Caption) 2 m6 z) o' W+ e5 O; b2 ?
{ 9 i$ P0 b/ P2 Q9 g
ListView1- >Items- >Item[m]= 
6 q9 V$ G. z1 _) X) G1 lListView1- >Items- >Item; 
; v$ B- U' l* N: m; M& ]3 ZListView1- >Items- >Item= 
! V$ [) W# p4 C& lListView1- >Items- >Item[j]; " X# ]. B5 i5 m+ h
ListView1- >Items- >Item[j]= , `3 g: R2 g1 Z3 t
ListView1- >Items- >Item[m]; : d, Q6 y& ^1 ?) F% X% v2 J. z
} 
) Y( \$ y1 Q1 \$ c} ' Q! r( r0 ~- l4 t
else , b) l* _7 q- g
{ 3 C% O( o& R+ k! u3 _ `
if(ListView1- >Items- >Item- >Caption< 
# p' d+ t' v( o: G3 F& wListView1- >Items- >Item[j]- >Caption) L! m) t& u$ |+ u# Z9 b" r" f' s
{ ) k& f9 s% k0 e& W4 c' k
ListView1- >Items- >Item[m]= 9 ]% l% S# c0 M; J% R) c5 Z
ListView1- >Items- >Item; 
! Z0 z# h) }' }3 @3 k% G5 }ListView1- >Items- >Item= 
( [5 m6 O$ R7 @. R6 v OListView1- >Items- >Item[j]; 
" [% g! r$ \3 O X! I" UListView1- >Items- >Item[j]= t1 ?, {$ q7 O o9 J
ListView1- >Items- >Item[m]; - V5 F: N+ w8 g2 o+ D! d' {0 A+ Q
} 
; Q" ^3 E, u5 l* | A9 P} 
/ q% F# @" s8 Q. \ListView1- >Items- >Delete(m); 
/ e ]% Z' H5 g# d, R* i/ preturn; 
9 f2 I l/ `/ ?6 P) T} 
 m( g. i4 {6 V) E3 @; Z 
) |& x+ m5 I+ u8 f" a4 J---- 点击其它列时，需要将所点击的列内容从ListView1- >Items- ' ]+ m* ?' @! {7 A7 E: `" M
>Item- > SubItems- >Text中抽出,并参照其进行排序。子项目在存储中，形 4 E, D$ \8 t4 ?1 o! @
式为_子项目１\r\n子项目2\r\n子项目3\r\n...子项目N\r\n_。为抽取其中某一 
$ k% ?' g7 e6 H9 _2 o子项目，需编写如下函数,并将其放于void __fastcall TForm1:: 
/ Q2 e) U. m" c! E: ~ListView1ColumnClick前面即可。 ) f3 k# J. H6 V9 h
#include < vcl/dstring.h > 
, Z- q% F9 S" C* b9 D7 Z. E" PAnsiString __stdcall sg(AnsiString str,int n) / E1 U) u3 o- g( A: p% n5 y! m5 T
{ 
! F, v; P' `) S5 ^8 hint l,i; : C4 t. d$ ^/ L& E( \* g0 @; q
AnsiString qq(str); 
5 O4 P( ~# z& B! h; I- i4 ]8 D# D4 nl=qq.Length(); 6 m- G5 ^9 E- M, n0 d( O5 J" x* e
AnsiString p(str); # w+ ~/ w+ m$ o- ?! l3 _9 \
char a[]="\r\n"; 1 x: S2 |/ U2 F" u7 j2 i9 W7 o
int j=0,k=0; 
( n5 R: K; Z+ Bfor(j=1;j< l;j++) 1 j( {4 ^) Z5 J6 @0 x; d
{ 
- m g/ M- {+ q5 vi=1; 
0 d n( Q4 V9 ]+ Cwhile(qq[j]!=a[0] && qq[j+1]!=a[1]) ( s% n+ s3 e K, `! `
{ 
+ G! V" c+ O/ a C9 R! ~p[i++]=qq[j]; . }% t+ S0 |6 K B" X
j++; 
0 b& q* R% h* ^6 }( Z" X H! ~+ |8 v} 
 j4 n; d8 R) @0 p- fk++; 
7 S1 f, a) N8 `! l: S! S+ Oif((k-1)==n) + ~# W: k% e8 b4 [. T& O9 ]
break; 
5 n% ?2 ?$ }* }+ ]} 
% g8 ?2 l. g& n0 U I4 X& [p=NULL; 
; d( V( S, z8 `0 ^' M+ creturn (p); 
! D9 E- B% b' L9 R* Y} 
; i! y* Z& l' e / @$ j2 r. n* h0 {, d
---- 有了此函数以后，只需将上面的ListView1- >Items- >Item- 
$ p& P. p- ~: c1 f>Caption更换为sg(ListView1- >Items- >Item- >SubItems- >Text,n-1)即 4 f. e# A4 e C- M/ C
可完成对此项目的点击排序功能。 
8 ^' M M) s) U1 @) wfor(i=0;i< m-1;i++) 
- B) I' [6 T2 O3 [for(j=i+1;j< m;j++) # i& D+ `7 v1 _/ U5 p- X
if(od) 
7 k- T# \) y' o9 R a/ |{ 
& H. J/ s6 e. x1 z9 Iif(sg(ListView1- >Items- > 8 }9 A( N. O# T4 d l
Item- >SubItems- >Text,n-1) > 
4 H, k" y: F) {, w6 msg(ListView1- >Items- > 
$ K3 `7 u' E0 Y) R- V6 rItem[j]- >SubItems- >Text,n-1)) " }& T4 R: Z, y2 r) s7 g

! Q" U0 t: D& T8 n. A// ...以下从略 
$ ]- \$ Z# a0 L 7 j* r3 p5 W5 Q$ y5 K
最后，删除临时的交换项目。 ' M. F3 o6 ]# ]9 u& B/ f
ListView1- >Items- >Delete(m); 3 N7 J; _6 M% B* p" K
 2 R# Y% F+ F) j! n% i# z. Y
---- 编译运行程序后，即会看到我们预期的结果。另外,本程序是按照字符串方 . g# M7 q5 \$ ]5 ^" Y3 d5 G- d
式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可 
9 X W5 ~' }' [) _ 

欢迎光临数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5