delphi中的LISTVIEW怎么与数据库连接
标签：ado begin ubi tab items 数据库 code 数据库连接 cap
delphi中的LISTVIEW怎么与数据库连接
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;