TListView 如何显示 SubItems 内容？

kingisw 2003-08-19 08:22:20

TListView 如何显示 SubItems 内容？

...全文

52 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

kingisw 2003-08-19

打赏
举报

回复

恩，好，其实我已经发现了，谢谢

zxp2005 2003-08-19

打赏
举报

回复

定义出它的列就可以了。
如：
var
tmpColumn: TListColumn;
tmpItem: TListItem;

procedure TestAddListview(aList: TListView);
begin
aList.Clear;
tmpColumn := aList.Columns.Add;
tmpColumn.Caption := '名称';
tmpColumn := aList.Columns.Add;
tmpColumn.Caption := '性别';
tmpColumn := aList.Columns.Add;
tmpColumn.Caption := '年龄';

tmpItem := aList.Items.Add;
tmpItem.Caption := 'lxp';
tmpItem.SubItems.add('nam');
tmpItem.SubItems.Add('24');
end;

将ViewStyle属性设为vsReport。

kingisw 2003-08-19

打赏
举报

回复

不行

AustinLei 2003-08-19

打赏
举报

回复

将ViewStyle属性设为vsReport。

Delphi在TListView中显示数据库，ListView控件的简单用法，在日常的编程开发中，这个比较常用。　self.ListView1.ViewStyle:=vsReport; 　for i:=0 to Query1.FieldCount-1 do 　begin 　TempColumn:=self....

Listview取值，与赋值 (1)赋值 with ListView1.Items.Add do begin ... SubItems.add(aaaaa); //添加后面数据 SubItems.add(1234); SubItems.add(1234); end; //一定要使用WITH结构. (2)取值

lvwEdit1.AddSubItems(index) = Text '设置LISTVIEW的SubItems数据 lvwEdit1.AltBackGround = boolen '表格背景是否需要分行分颜色显示，需要添加数据后设置 lvwEdit1.AltBackGroundColor = OLE_COLOR '表格背景是否...

ListItem.SubItems.Add('第三列内容'); end; //按标题删除 for i:=ListView1.Items.Count-1 downto 0 Do if ListView1.Items[i].Caption = Edit1.Text then begin ListView1.Items.Item[i].Delete(); //删除...

首先创建一个新的项目，然后向窗体上添加一个TQuery组件和一个TListView组件.　设置TQuery组件的DatabaseName属性设置为DBDEMOS，SQL属性设置为select * from country。然后添加程序初始化代码如下： with adoquery...

5,388

社区成员

262,730

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章