Grid1.Icons.Add LoadPicture("bild.bmp")

Grid1.ColumnAdd , "Bild", , , , TYPE_IMAGE

With Grid1.AddItem("Text der 1. Spalte" & vbTab & "Text der 2. Spalte)
  .CellImage("Bildspalte") = 1  ' Index des Bildes innerhalb der 
  ' Icons-Auflistung
End With

Private Sub Grid1_RowLoaded(ByVal nRow As Long, Item As sevDataGrid2.ListItem)
  With Item
    .CellImage("Bildspalte") = 1 ' Index des Bildes innerhalb der 
    ' Icons-Auflistung
  End With
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de