File icons

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   What size is the icon you wish to display?  Try setting the width of the column to width of icon + 1.  Also be sure to have muliline True.

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
SuperMario Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 14 February 2004 Status: Offline Points: 18057	Post Options Post Reply Quote SuperMario Report Post Thanks(0) Quote Reply Topic: File icons Posted: 08 June 2006 at 8:45am
	What size is the icon you wish to display? Try setting the width of the column to width of icon + 1. Also be sure to have muliline True.

Francesca Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 08 June 2006 Status: Offline Points: 1	Post Options Post Reply Quote Francesca Report Post Thanks(0) Quote Reply Posted: 08 June 2006 at 6:22am
	I'm trying to add the icon related to the file extension and I'm using: Public Function GetIcon(ByVal Filename As String, ByVal iSize As IconSize) As System.Drawing.Icon Dim hImg As IntPtr Dim shinfo As New SHFileInfo ' Depending on the size, get the icon from the file If iSize = IconSize.Small Then ' Return small icon hImg = SHGetFileInfo(Filename, 0, shinfo, Marshal.SizeOf(shinfo), SHGFI_ICON Or SHGFI_SMALLICON) ElseIf iSize = IconSize.Large Then ' Return large icon hImg = SHGetFileInfo(Filename, 0, shinfo, Marshal.SizeOf(shinfo), SHGFI_ICON Or SHGFI_LARGEICON) End If 'The icon is returned in the hIcon member of the shinfo struct. GetIcon = System.Drawing.Icon.FromHandle(shinfo.hIcon) End Function Add the icon but when add the icon to the report control: Dim ico As System.Drawing.Icon ... rpCtrl.Icons.AddIcon(ico.Handle.ToInt32, nImageIndex, XTPImageState.xtpImageNormal) But I can't see the icon in the report control Thanks