The following code is in the init section of a form which has an Imagelist control and a Listview control. This code is used to populate the listview control, but I keep getting an "invalid key' error.


*** Loading Icons into Image List ***
For I = 1 To lnButtons &&Number of buttons
thisform.imglstButtons.ListImages.Add(,,Loadpicture(laButtons(i,1)))
Endfor
thisform.olecontrol3.Icons = thisform.imglstButtons
**thisform.olecontrol3.SmallIcons = thisform.imglstButtons

*** Loading imagelist icons into listview ****
For I = 1 To thisform.imglstButtons.listImages.count
**thisform.olecontrol3.ListItems.Add(,,
lcKey = Right(Sys(2015),6)
Error ----- thisform.olecontrol3.ListItems.Add(,,'',thisform.imglstButtons.ListImages(i).Picture)
Endfor

If anyone can help me and help me better understand how this error is caused, I would greatly appreciated.

MEH