请教ListView如何在里面根据数据库一表记录自动添加个数啊,而且添加图标不一样啊?
table 字段 t1,t2 放一个ImageList1控件。
t1='1'是添加图标序列1;名字为‘T1’
t1='2'是添加图标序列2 名字为‘T2’
多谢???
table 字段 t1,t2 放一个ImageList1控件。
t1='1'是添加图标序列1;名字为‘T1’
t1='2'是添加图标序列2 名字为‘T2’
多谢???
解决方案 »
- 网页字符串的换行符是什么?
- 如何通过颜色确定坐标?
- 怎样制作网络电视的播放引擎?
- 如何用memo、或RICHTEXT打开WORD、WPS及文档?急!解答正确立即给分!
- 请教加快delphi6下的TIdTcpServer通信速度问题?
- 建立了一个form,加入了project里,为什么一运行这个project就显示这个form?
- ■■■发布一个免费的小软件,用MSN的朋友注意一下了!!■■■
- 本人使用TJREngine 来修复access ,出现"初始化字符串不符合ole db规定"的错误?
- 如何使打印预览效果有纵向和横向的效果
- 系统有FAT32 和NTFS 两种分区,在WIN98环境下(不装NT),用什么工具使FAT32下文件拷到NTFS下,也即用什么工具操作NTFS??
- 当adoquery或者ClientDataSet的记录指针移动时,会自动post,如何禁止?
- TADOQuery控件在Filter后Locate不能正确定位的问题
ListView.Items.Clear;
while not table.eof do
begin
with ListView do
begin
Caption := 'T'+table.FieldByName('T1').AsString;
ImageIndex := table.FieldByName('T1').AsInteger;
end;
table.next;
end;
--事先在 ImageList 中放好了图标,并且 T1 字段的值代表的图标与 ImageList 的一致。
table.first;
ListView.Items.Clear;
while not table.eof do
begin
with ListView.Items.Add do //这句写错了
begin
Caption := 'T'+table.FieldByName('T1').AsString;
ImageIndex := table.FieldByName('T1').AsInteger;
end;
table.next;
end;