Delphi10.3的ListView学习(大图标)

2020-06-05 16:01:20来源:博客园 阅读 ()

新老客户大回馈,云服务器低至5折

万一的 Delphi 博客,基础学习ListView

使用 TListView 控件(1)

使用 TListView 控件(2)

使用 TListView 控件(3)

使用 TListView 控件(4)


这里强调一下ImageList是可以改图片尺寸的:最大256*256

 

 

procedure TForm1.FormCreate(Sender: TObject);
begin
  ImageList1.Width:=256;//1..256
  ImageList1.Height:=256;//1..256
  ListView1.LargeImages:=ImageList1;  //  大图标 放在ImageList1,放在ImageList1
  ListView1.ViewStyle := vsIcon; //设成  大图标 模式
  // 增加记录
  with ListView1.Items.Add  do begin
    Caption := '111';
    ImageIndex:=0;
  end;
  with ListView1.Items.Add  do begin
    Caption := '222';
    ImageIndex:=1;
  end;
end;

单击某项Item的事件

procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem;  Change: TItemChange);
begin
  Caption:= Item.Caption;
end;

 


原文链接:https://www.cnblogs.com/tulater/p/13050700.html
如有疑问请与原作者联系

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:Delphi10.3的SpeedButton/BitBtn学习

下一篇:没有了