文件名称:Delphi在TListView中显示数据库.rar
文件大小:14KB
文件格式:RAR
更新时间:2022-07-30 11:12:43
Delphi源码-界面编程
Delphi在TListView中显示数据库,ListView控件的简单用法,在日常的编程开发中,这个比较常用 。 self.ListView1.ViewStyle:=vsReport; for i:=0 to Query1.FieldCount-1 do begin TempColumn:=self.ListView1.Columns.Add; TempColumn.Caption:=Query1.Fields[i].FieldName; end; Query1.First; while not Query1.Eof do begin TempItem:=self.ListView1.Items.Add; TempItem.Caption:=Query1.Fields[0].AsString; for i:=1 to Query1.FieldCount-1 do begin TempItem.SubItems.Add(Query1.Fields[i].AsString); end; Query1.Next; end;
【文件预览】:
codesc.net
----Delphi在TListView中显示数据库()
--------Project1.res(876B)
--------Unit1.dfm(681B)
--------Unit1.ddp(51B)
--------Project1.cfg(358B)
--------orders.db(70KB)
--------Unit1.pas(1KB)
--------employee.db(6KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(5KB)