- 人气:
- 放大
- 缩小
- 二维码
- 赞赏
delphi LISTVIEW 与数据库连接
listview的viewstyle属性设置为vsReport
gridline属性设置为true
双击listview,添加列,有多少个字段显示就添加几个列
举例代码
listview1.clear;
with adoquery1 do
begin
Sql.text := 'Select * from table1';
Open ;
while not eof do
begin
with listview1.items.add do
begin
caption := fieldbyName('field1').asstring;
subitems.add(fieldbyName('field2').asstring);
subitems.add(fieldbyName('field3').asstring);
subitems.add...
end;
Next;
end;
end;