or






Dim iScroll As Integer = 0'get scrollbar width if neededIf Me.lvwLoadForms.VerticalScroll.Visible = True Then iScroll = SystemInformation.VerticalScrollBarWidth'resize items and group widthsWith Me.RadListView1 .GroupItemSize = New Size(.Width - iScroll, .GroupItemSize.Height) .ItemSize = New Size(.Width - .GroupIndent - iScroll, .ItemSize.Height)End With'Loading image from file ( path in database ) Dim img As Image = Image.FromFile(Reader("Imagem"))'Attempt 1 r.Cells(2).Value = img'Attempt 2'Writing to a memory stream Dim ms As New MemoryStream img.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)'passing the bytes to the value field r.Cells(2).Value = ms.ToArray'Attempt 3'Simply loading an image from resources to the value field r.Cells(2).Value = My.Resources.icon_fantasma_05
