TListView组件使用方法

原创 2003年08月01日 18:58:00

引用CommCtrl单元

procedure TForm1.Button1Click(Sender: TObject);

begin

   ListView_DeleteColumn(MyListView.Handle, i);//i是要删除的列的序号,从0开始

end;

用LISTVIEW显示表中的信息:
procedure viewchange(listv:tlistview;table:tcustomadodataset;var i:integer);
 begin
       tlistview(listv).Items.BeginUpdate;   {listv:listview名}
        try
          tlistview(listv).Items.Clear;
          with table do         {table or query名}
           begin
            active:=true;
            first;
            while not eof do
             begin
              listitem:=tlistview(listv).Items.add;
              listitem.Caption:=trim(table.fields[i].asstring);
  //            listitem.ImageIndex:=8;
             next;
             end;
        end;
        finally
        tlistview(listv).Items.EndUpdate;
      end;
 end;

TListView的用法(转载)

原文地址:http://www.cnblogs.com/sideandside/archive/2007/03/26/688707.html TListView用法1.TListView方法:proc...
  • Yang_Seal
  • Yang_Seal
  • 2010年07月28日 14:52
  • 3849

delphi 7中Tlistview的使用

今天刚注册了,  先发一篇文章试试, 照朋友的话说, 我是稀缺人才, 现在没有人用delphi了, anyway, 把自己多年的一点经验share一下. 如果不使用第3方空间的话, delphi 中的...
  • t2wei
  • t2wei
  • 2007年06月21日 11:57
  • 1183

Delphi列表视图组件(TListView)详解

·BoundingRect 返回一个能把列表视图中所有项包住的矩形 ·CheckBoxed 列表视图中项的旁边将显示复选框 ·Column 此属性可以访问列表视图中的每一栏 ·ColumnCli...
  • yt_maomao
  • yt_maomao
  • 2014年07月12日 13:54
  • 1149

TListView

//删除当前行 for i:=ListView1.Items.Count-1 downto 0 Do if ListView1.Items[i].Caption = Edit1.Text then b...
  • gfuchao
  • gfuchao
  • 2013年03月12日 06:06
  • 390

Delphi TListView 修改列表头高度、字体大小

unit Unit2; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, ...
  • any2mobile
  • any2mobile
  • 2015年09月29日 15:40
  • 1336

Delphi(ADOConncction+ADOQuery+DataSoure+TListView)TListView显示数据库查询数据!!!--演示案例

procedure TmyTestForm.FormShow(Sender: TObject);var  i:Integer;  sSql:String;  TempColumn:TListColum...
  • zhanglieguo
  • zhanglieguo
  • 2009年11月17日 10:20
  • 1585

TListView 列宽自适应大小

看图说话,直接看效果。设置前: 设置后: 我使用的设置: listview1.Columns[1].Width:=-2; //Columns[1]设置SubItems扩展: a、a、 Lis...
  • dingding_12345
  • dingding_12345
  • 2015年11月17日 16:17
  • 2199

delphi列表视图组件(TListView)使用方法|实例

TListView 组件以多种形式显示列表的项目,如详细资料、小图标、大图标等形式表示列表中的项目。     列表视图与用TListBox 组件实现的列表框非常相似。不同的是,列表视图可以让用户选择不...
  • wozengcong
  • wozengcong
  • 2016年03月10日 20:40
  • 2768

一个功能增强的Delphi TListView组件

在Windoes编程中列表视图(ListView)是一个通用控件,当将其样式设为Report时,系统将自动为它加上一个表头控件(以下简称表头),但通常我们不能直接对这个表头控件进行操作。同样Delph...
  • zwylly99
  • zwylly99
  • 2007年09月30日 12:49
  • 736

TListView组件显示文件夹中的文件

procedure GetDirectories(list: TlistView; Directory: string; Item: Tlistitem; IncludeFiles: boolean)...
  • IORILI
  • IORILI
  • 2003年08月13日 10:34
  • 859
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:TListView组件使用方法
举报原因:
原因补充:

(最多只允许输入30个字)