listview控件可有4种不同的视图显示方法 1Word文件下载.docx

listview控件可有4种不同的视图显示方法 1Word文件下载.docx

《listview控件可有4种不同的视图显示方法 1Word文件下载.docx》由会员分享，可在线阅读，更多相关《listview控件可有4种不同的视图显示方法 1Word文件下载.docx（17页珍藏版）》请在冰豆网上搜索。

另一部分是前者的子项文本信息（第2列，第3列......）。

而listItems即是对listItem对象集合（所有行）的引用。

故此，listItems

（1） 

可以表示为第1行；

listitems

（1）.text 

返回第1行第1列的文本值；

listitems

（1）.subItem

（1） 

返回第1行第2列的文本值。

【 

控件常用属性 

】 

[1]view属性 

该属性有4个值可设定：

1－－－小图标视图显示 

2－－－列表 

3－－－报表 

0－－－无图标（默认） 

[2]AllowColumnReorder属性 

值设置.t.时，用户可以用鼠标选中1列拖至其他地方进行重新排列。

[3]Checkboxes属性 

设置为.t.时，每一行数据前将显示一复选框。

[4]FlatScrollBar属性 

设置为.f.时控件将显示滚动条。

[5]FullRowSelect属性 

设置为.t.时可以整行地选择数据。

[6]GridLines属性 

设置为.t.时控件将显示网格线。

（只作用于“报表”视图） 

[7]HideColumnHeaders属性 

设置为.f.时，列标题可视，反之则不可视。

[8]HotTracking属性 

设置为.t.时，鼠标所在行将以高亮度显示。

[9]Icons,SmallIcons属性 

两者设置listview控件视图相关联的ImageList控件中的图片。

Icons指明视图为大图标时的关联；

SmallIcons指明视图为小图标时的关联。

[10]LabelWrap属性 

设置为.t.时，文本标签超出列宽时可换行。

[11]SelectedItem属性 

返回对所选ListItem对象（行）的引用。

[12]Sorted属性 

当值为.t.时，列表按字母排序。

[13]Picture属性 

指定控件的背景图片，此属性在控件自带属性设置框里设置。

***************************************************************** 

控件常用方法程序 

[1]Add方法 

添加listItem对象（行）到控件中。

语法格式：

控件ListItems集合.add（index,key,text,icon,smallIcon） 

[2]FindItem方法 

查找并返回对控件中listItem对象的引用。

控件名.FindItem（string,value,index,match） 

****************************************************************** 

新建一表单，在表单里拖出一个ListView控件和一个ImageList控件。

选中ListView控件，单击右键，选择“ListViewCtrl 

Properties”，在General页面框中选中下列复选框：

LabelWrap:

文本可换行 

Checkboxes:

显示复选框 

FullRowSelect:

整行选定 

清除FlatScrollBar的选定，控件将显示滚动条。

************************************************************** 

控件 

name属性 

ListView 

view1 

ImageList 

Image1 

*************************************************************** 

在表单的Init事件中加入下列代码：

&

&

将ImageList控件图片赋予Listview控件&

thisform.view1.Icons=thisform.Image1.object 

thisform.view1.smallIcons=thisform.Image1.object 

**************************************************************** 

在listview控件init事件中加入下列代码：

初始化ListView控件&

设置显示为报表视图 

this.view=3 

添加和设置列标 

store 

this.ColumnHeaders.Add（,"

l11"

"

序号"

this.Width/7） 

to 

clm1 

l12"

物资编号"

this.width/4） 

clm2 

l13"

存货名称"

this.Width/4） 

clm3 

l14"

规格"

clm4 

l15"

计量单位"

this.Width/8） 

clm5 

l16"

请购数量"

clm6 

l17"

使用日期"

clm7 

l18"

请购用途"

clm8 

this.hottracking=.t. 

鼠标停留行高亮度显示 

将数据表添加到listview控件中显示：

新建一表单方法程序 

refresh_grid，可随时调用刷新数据。

在其中加入下列代码：

L1=thisform.view1 

L1.listItems.clear 

清除数据 

sele 

请购表 

scan 

添加listItem对象第1列图标和文本。

L1.listItems.Add（,,序号,,1） 

bbb 

添加第2,3...列文本 

alltrim（物资编号） 

bbb.subitems

（1） 

alltrim（存货名称） 

bbb.subitems

（2） 

alltrim（规格） 

bbb.subitems（3） 

alltrim（计量单位） 

bbb.subitems（4