---- 列表框控件在应用程序中的使用率很高,在windows中经常见到,它有四种常见的式样,分别具有显示大图标,小目标,含有图标的多列列表,含有列标头的列表。我们也经常见到一些扩展功能,例如我们在资源管理器中的文件列表框中,在选用详细资料察看时,用鼠标单击列标头,如大小,则所列文件按大小排序;单机日期,则按文件日期进行排序.这一功能增强了应用程序的可用性,使操作更直观、方便。笔者在以Borland C++Builder 3.0(以下简称BCB)作为开发平台实现这一功能时发现,仅通过设定列表框控件的属性值的方法,只能根据项目的首列加以排序,不能根据子项目(SubItems)排序。因此,我们需要编写自己的代码以完成这一功能。
---- 以下描述如何在BCB开发平台上为列表框添加列标头点击排序功能,当我们点击的次数为奇数时,所列内容以降序排列;当我们点击的次数为偶数时,所列内容以升序排列。
---- 首先将一个列表框控件安放在Form上,并将其名称设为ListView1。然后在其中添加若干项目作为试验对象。方法为:用鼠标右键单击控件,在弹出的对话框中选择Columns Editor用来添加列和子列;再选Items Editor用来添加项目(包含子列和主列上的内容)。
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)---- 为了显示出子项目内容,需要在Object Inspector中修改ListView属性值,将ViewStyle设置为vsReport。另外,还必须将SortType设置为None,以使我们的排序程序起作用。这样,程序的外观已经符合需要,下面应该增加排序功能的代码了。为此需要添加类的方法到源代码中。添加位置为:
void __fastcall TForm1::ListView1ColumnClick
(TObject *Sender,
TListColumn *Column)
---- 在该方法的传递参数中,指向TListColumn类型的指针Column中含有用户所点击的列的信息。
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)---- 下面先定义变量:
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[i]- Caption进行,与其它列不同,所以要单独进行排序。
if (n==0)
{
for(i=0;i m-1;i++)
for(j=i+1;j m;j++)
if(od)
{
if(ListView1- Items- Item[i]- Caption
ListView1- Items- Item[j]- Caption)
{
ListView1- Items- Item[m]=
ListView1- Items- Item[i];
ListView1- Items- Item[i]=
ListView1- Items- Item[j];
ListView1- Items- Item[j]=
ListView1- Items- Item[m];
}
}
else
{
if(ListView1- Items- Item[i]- Caption
ListView1- Items- Item[j]- Caption)
{
ListView1- Items- Item[m]=
ListView1- Items- Item[i];
ListView1- Items- Item[i]=
ListView1- Items- Item[j];
ListView1- Items- Item[j]=
ListView1- Items- Item[m];
}
}
ListView1- Items- Delete(m);
return;
}
---- 点击其它列时,需要将所点击的列内容从ListView1- Items- Item[i]- SubItems- Text中抽出,并参照其进行排序。子项目在存储中,形式为_子项目1rn子项目2rn子项目3rn...子项目Nrn_。为抽取其中某一子项目,需编写如下函数,并将其放于void __fastcall TForm1::ListView1ColumnClick前面即可。
#include vcl/dstring.h
AnsiString __stdcall sg(AnsiString str,int n)
{
int l,i;
AnsiString qq(str);
l=qq.Length();
AnsiString p(str);
char a[]="rn";
int j=0,k=0;
for(j=1;j l;j++)
{
i=1;
while(qq[j]!=a[0] && qq[j+1]!=a[1])
{
p[i++]=qq[j];
j++;
}
k++;
if((k-1)==n)
break;
}
p[i]=NULL;
return (p);
}
---- 有了此函数以后,只需将上面的ListView1- Items- Item[i]- Caption更换为sg(ListView1- Items- Item[i]- SubItems- Text,n-1)即可完成对此项目的点击排序功能。
for(i=0;i m-1;i++)
for(j=i+1;j m;j++)
if(od)
{
if(sg(ListView1- Items-
Item[i]- SubItems- Text,n-1)
sg(ListView1- Items-
Item[j]- SubItems- Text,n-1))
// ...以下从略
最后,删除临时的交换项目。
ListView1- Items- Delete(m);
---- 编译运行程序后,即会看到我们预期的结果。另外,本程序是按照字符串方式进行排序的,如果需要按照数字或其它方式排序,只需进行相应的类型转换即可。理解本程序后,读者即掌握了对ListView控件编程的一条基本思路,对今后使用BCB以及对windows编程起到良好作用。