之间网

新闻实时快讯(实时快讯listview的用法)

精选经验
导读 您好,今日西西来为大家解答以上的问题。新闻实时快讯,实时快讯listview的用法相信很多小伙伴还不知道,现在让我们一起来看看吧!1、procedu...

您好,今日西西来为大家解答以上的问题。新闻实时快讯,实时快讯listview的用法相信很多小伙伴还不知道,现在让我们一起来看看吧!

1、procedure TForm1.extract(filename:string);varbegin i:=-1; count:=extracticon(hinstance,pchar(filename),i); for i:=0 to count-1 do我用了膳绫擎的代码后,listview的每一个项目标搁笔都是小搁笔,不会是32*32的,这怎么回事 begin SetLength(ico,i+1); ico[i]:=TIcon.Create;//留意,ico是全局动态数组变量 imagelist1.AddIcon(ico[i]); listview1.Items.add; listview1.Items[i].Caption:=Extractfilename(filename); i,count:integer; listview1.Items[i].ImageIndex:=i; end;end; ico[i].Handle:=extracticon(hinstance,pchar(filename),i);注:listview1.LargeImagss:=ImageList1;to softsprite:不好意思,你如今还不克不及获得20分;to yinfudan:我很穷;。

本文就为大家分享到这里,希望小伙伴们会喜欢。

标签: