读书人

怎样更改imagelist里的图像大小,该如何

发布时间: 2012-01-08 22:48:50 作者: rapoo

怎样更改imagelist里的图像大小
有一个listview和一个imagelist控件,listview列表是显示大图像,imagelist里的图像是通过代码加进去的。怎么改变listview里大图像的图像大小和图像之间的行间距呀?是要在imagelist里去改吗,怎么改啊?

[解决办法]
ImageList1.ImageSize=new Point(32,32)
[解决办法]
图像大小可以设置imagelist控件里的imagesize属性,间距变小好像不太好设,
[解决办法]

VB.NET code
    Private C1 As New ImageList    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        ListView1.SmallImageList = C1        C1.Images.Clear() '清空备用ImageList内的图片        C1.ImageSize = New Point(32, 32) '设置内存图画布大小,该高度同时也将是ListView项的高度        C1.ColorDepth = ColorDepth.Depth32Bit        For I As Integer = 0 To ImageList1.Images.Count - 1            Using tmpBP As New Bitmap(C1.ImageSize.Width, C1.ImageSize.Height)                Using G As Graphics = Graphics.FromImage(tmpBP)                    Dim tp As Bitmap = ImageList1.Images(I)                    G.DrawImage(tp, New Rectangle((tmpBP.Width - tp.Width) / 2, (tmpBP.Height - tp.Height) / 2, tp.Width, tp.Height), New Rectangle(0, 0, tp.Width, tp.Height), GraphicsUnit.Pixel)                    C1.Images.Add(I, tmpBP)                End Using            End Using        Next        For I As Integer = 0 To C1.Images.Count - 1            ListView1.Items.Add("项目内容" & I, I)        Next        '提醒结帖    End Sub 

读书人网 >VB Dotnet

热点推荐