listview tile layout问题(vb.net)

概述我有一个listview,它显示(最终)一个itunes播放列表的专辑封面,其中有专辑名称.我遇到的问题是我无法获得专辑封面上的专辑封面(目前是空白方块).它总是站在一边……我该怎么做？我已经尝试添加列标题和alsorts … 用于设置列表视图的代码 Dim myImageList As ImageList albumList.View = View.Tile albumList 我有一个ListvIEw,它显示(最终)一个itunes播放列表的专辑封面,其中有专辑名称.我遇到的问题是我无法获得专辑封面上的专辑封面(目前是空白方块).它总是站在一边……我该怎么做？我已经尝试添加列标题和alsorts …

用于设置列表视图的代码

Dim myImageList As ImageList    albumList.VIEw = VIEw.Tile    albumList.TileSize = New Size(120,150)    ' Initialize the item icons.     myImageList = New ImageList()    myImageList.Images.Add(Image.Fromfile("c:/test.jpg"))    myImageList.ImageSize = New Size(80,80)    albumList.LargeImageList = myImageList

然后我做一个循环来显示使用的每个专辑名称

Dim item0 As New ListVIEwItem(New String() _                {Albums(i).name},0)        albumList.Items.Add(item0)

输出是http://i111.photobucket.com/albums/n122/mfacer/Screenshot2010-05-02at164815.png

但正如我所说,我希望专辑名称在橙色框下面….

有任何想法吗？？
感谢您的任何信息！

解决方法 这是瓷砖视图的烘焙安排.如果您想要图像下方的标签,则必须设置VIEw = LargeIcon.如果这会产生不需要的图像间距,那么您可以通过P / Invoke SendMessage()发送LVM_SETICONSPACING消息.这很好用：

using System;using System.Drawing;using System.windows.Forms;using System.Runtime.InteropServices;class TileVIEw : ListVIEw {  public TileVIEw() {    mSpacing = new Size(48,48);  }  private Size mSpacing;  public Size IconSpacing {    get { return mSpacing; }    set {      mSpacing = value;      updateSpacing();    }  }  protected overrIDe voID OnHandleCreated(EventArgs e) {    base.OnHandleCreated(e);    updateSpacing();  }  private voID updateSpacing() {    if (this.IsHandleCreated) {      SendMessage(this.Handle,0x1000 + 53,IntPtr.Zero,(IntPtr)((mSpacing.Height << 16) | mSpacing.WIDth));    }  }  [Dllimport("user32.dll")]  private static extern IntPtr SendMessage(IntPtr hWnd,int msg,IntPtr wp,IntPtr lp);}

更改设计器中的新IconSpacing属性,以便与ImageList中的图像大小配合使用.你会立即看到效果.

Public Class TileVIEw  inherits ListVIEw  Public Sub New()    mSpacing = New Size(48,48)  End Sub  Private mSpacing As Size  Public Property IconSpacing As Size    Get      Return mSpacing    End Get    Set(ByVal value As Size)      mSpacing = value      updateSpacing()    End Set  End Property  Protected OverrIDes Sub OnHandleCreated(ByVal e As System.EventArgs)    MyBase.OnHandleCreated(e)    updateSpacing()  End Sub  Private Sub updateSpacing()    If Me.IsHandleCreated Then      SendMessageW(Me.Handle,&H1000 + 53,CType((mSpacing.Height << 16) Or mSpacing.WIDth,IntPtr))    End If  End Sub  Private Declare Function SendMessageW lib "user32.dll" (ByVal hWnd As IntPtr,ByVal msg As Integer,ByVal wp As IntPtr,ByVal lp As IntPtr) As IntPtrEnd Class

总结

以上是内存溢出为你收集整理的listview tile layout问题(vb.net)全部内容，希望文章能够帮你解决listview tile layout问题(vb.net)所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。