eXontrol Software - List ActiveX, NET Control

The user can add images at design time, by drag and drop files to list's image holder. Use the ReplaceIcon method to update the images list collection at runtime. Use the CellImage, CellImages properties to assign icons to a cell. Use the CellPicture property to assign a custom size picture to a cell. Use the CheckImage or RadioImage property to specify a different look for checkboxes or radio buttons in the cells.

The following VB sample loads an icon using the BASE64 encoded string:

With List1 .BeginUpdate .Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwkQsuGQGJqrAxgAxjAwk9w2Th8Tf8uytIw2Py2OxucxKApuc0mfxuRzWXpmcymX0uQ14A0NB2O1xut1Eaw0oyuc3mq3WV3fCzM7ze33un0UZ5exoG+jW2yG43GA3fB4HBlGz2fU4s61nE13KjO+5unnfQ8vo9ew5GX7vizvXuXVjfF5fY+eV2cTzqcPC8bpuSyDZvM9qev66L2M9AbLtw7jFPs+r5Pu/kJMy+UIQw7KauPBzOuc/LzwKxSaNBE0FxK0UAtlDj9wEurvQ6/sNQrGz4RSm0ZxhELTPdICatjBUER5CLRQmuMeLBFsjxc0T4wfAkGp66TOvzHj1L7HkuO+osUSRHErsVKMqKJIyNSxCrcy7DqmTLDcwylHM5KbLMGNylskqhJLcOcq89zzQVB0JQq6osHyV0SjyQJEkgAJKlFIpw+lDUoijVHmd5+H+ebVHgZ54B+cDVHAB9THAH6MnAAJwAOYAHvLVtXoMx1ZkBSNcGAA9cOYAJgINWtIWAAFhV+AZAAO5gP2BV1V1GAZ8ViAB8B+eABn9aZ/D+fIHn+T6M0w1SAgA==" .Columns.Add("Column 1").HeaderImage = 1 With .Items Dim i As Long i = .Add("Item 1") .CellImages(i, 0) = "2,3" End With .EndUpdate End With

The following VB sample uses the Microsoft Image List control:

List1.Images ImageList1.hImageList

The following C++ sample loads icons from a BASE64 encoded string:

#include "Items.h" #include "Columns.h" #include "Column.h" m_list.BeginUpdate(); CString s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBnqAQEZwmCxFhYGLib"; s += "/xoAw9ZiFdxbAAGVxM5yOTzkPy+MzGRpmdx2kl2epGY1WgxmZl+Yyery2yyGHyeirGoo+03mM02Jzee029y2Ewum2+FnOTlGezHNx0b3/C3U258a4mP5HVvOw52s2fg2vH6ml8uf8OWmnMjXs9vRjXG8fa88068Z+/o/XJ8nm/zHrg4L/ti8TQts87svyljfuk+DlPfAbPPkicAJnCbs"; s += "NbDDLO2xz5PlBi3O8x0EsZD7zuG8T1vrCD5uZE7zxM+CXQNB78RKw8RRbF8Rwyu0UPS/UYsfBSbw4lEJx3AEkwvGbxSY/clsPIT3L600pxhHECx6lsjLA7LbxZH7XJfK0Dwi/8iNPJMjSo0clvjMLuTHLkJTNCqVTSms2Tkq8jTzOcVP/BsePUocQLDQ9AJ3LtFUbR1HqaiwfJXSaPJA"; s += "kSSAAkqUU2nE20gmp5oo6JwH+eZ31EjJwB+eBn1K/AHnBWIfvwAZwACYAHsMy9cIMyFeEBTrIADYKSWLX1ipLXxgJLYgDoyeDIA+cFngAfwAVWfFdIcAB8B+f1tn+YJ/D+f5Poyf5xoojKAg"; m_list.Images( COleVariant( s ) ); m_list.GetColumns().Add( "Column 1" ); COleVariant vtMissing; V_VT( &vtMissing ) = VT_ERROR; CItems items = m_list.GetItems(); long h = items.Add( COleVariant( "Item 1" ) ); items.SetCellImage( h, COleVariant( (long) 0 ), 1 ); h = items.Add( COleVariant( "Item 2" ) ); items.SetCellImages( h, COleVariant( (long) 0 ), COleVariant( "2,3" ) ); m_list.EndUpdate();

The following VB.NET sample loads icons from a BASE64 encoded string:

Dim s As String With AxList1 .BeginUpdate() s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBnqAQEZwmCxFhYGLib/xoAw9ZiFdxbAAGVxM5yOTzkPy+MzGRpmdx2kl2epGY1WgxmZl+Yyery2yyGHyeirGoo+03mM02Jzee029y2Ewum2+FnOTlGezHNx0b3/C3U258a4mP5HVvOw52s2fg2vH6ml8uf8OWmnMjXs9vRjXG8fa88068Z+/o/XJ8nm/zHrg4L/ti8TQts87svyljfuk+DlPfAbPPkicAJnCbsNbDDLO2xz5PlBi3O8x0EsZD7zuG8T1vrCD5uZE7zxM+CXQNB78RKw8RRbF8Rwyu0UPS/UYsfBSbw4lEJx3AEkwvGbxSY/clsPIT3L600pxhHECx6lsjLA7LbxZH7XJfK0Dwi/8iNPJMjSo0clvjMLuTHLkJTNCqVTSms2Tkq8jTzOcVP/BsePUocQLDQ9AJ3LtFUbR1HqaiwfJXSaPJAkSSAAkqUU2nE20gmp5oo6JwH+eZ31EjJwB+eBn1K/AHnBWIfvwAZwACYAHsMy9cIMyFeEBTrIADYKSWLX1ipLXxgJLYgDoyeDIA+cFngAfwAVWfFdIcAB8B+f1tn+YJ/D+f5" s = s + "Poyf5xoojKAg" .Images(s) .Columns.Add("Column 1") With .Items Dim h As Integer h = .Add("Item 1") .CellImage(h, 0) = 1 h = .Add("Item 2") .CellImages(h, 0) = "2,3" End With .EndUpdate() End With

The following C# sample loads icons from a BASE64 encoded string:

axList1.BeginUpdate(); string s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBnqAQEZwmCxFhYGLib/xoAw9ZiFdxbAAGVxM5yOTzkPy+MzGRpmdx2kl2epGY1WgxmZl+Yyery2yyGHyeirGoo+03mM02Jzee029y2Ewum2+FnOTlGezHNx0b3/C3U258a4mP5HVvOw52s2fg2vH6ml8uf8OWmnMjXs9vRjXG8fa88068Z+/o/XJ8nm/zHrg4L/ti8TQts87svyljfuk+DlPfAbPPkicAJnCbsNbDDLO2xz5PlBi3O8x0EsZD7zuG8T1vrCD5uZE7zxM+CXQNB78RKw8RRbF8Rwyu0UPS/UYsfBSbw4lEJx3AEkwvGbxSY/clsPIT3L600pxhHECx6lsjLA7LbxZH7XJfK0Dwi/8iNPJMjSo0clvjMLuTHLkJTNCqVTSms2Tkq8jTzOcVP/BsePUocQLDQ9AJ3LtFUbR1HqaiwfJXSaPJAkSSAAkqUU2nE20gmp5oo6JwH+eZ31EjJwB+eBn1K/AHnBWIfvwAZwACYAHsMy9cIMyFeEBTrIADYKSWLX1ipLXxgJLYgDoyeDIA+cFngAfwAVWfFdIcAB8B+f1tn+YJ/D+f5"; s = s + "Poyf5xoojKAg"; axList1.Images(s); axList1.Columns.Add("Column 1"); int h = axList1.Items.Add("Item 1"); axList1.Items.set_CellImage(h, 0, 1); h = axList1.Items.Add("Item 2"); axList1.Items.set_CellImages(h, 0, "2,3"); axList1.EndUpdate();

The following VFP sample loads icons from a BASE64 encoded string:

local s With thisform.List1 .BeginUpdate() s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrl" s = s + "dr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBnqAQEZwmCxFhYGLib/xoAw9ZiFdxbAAGVxM5yOTzkPy+MzGRpmdx2kl2epGY1WgxmZl+Yyery2yyGHyeir" s = s + "Goo+03mM02Jzee029y2Ewum2+FnOTlGezHNx0b3/C3U258a4mP5HVvOw52s2fg2vH6ml8uf8OWmnMjXs9vRjXG8fa88068Z+/o/XJ8nm/zHrg4L/ti8TQts87svyljfuk+DlPfAbPP" s = s + "kicAJnCbsNbDDLO2xz5PlBi3O8x0EsZD7zuG8T1vrCD5uZE7zxM+CXQNB78RKw8RRbF8Rwyu0UPS/UYsfBSbw4lEJx3AEkwvGbxSY/clsPIT3L600pxhHECx6lsjLA7LbxZH7XJfK0D" s = s + "wi/8iNPJMjSo0clvjMLuTHLkJTNCqVTSms2Tkq8jTzOcVP/BsePUocQLDQ9AJ3LtFUbR1HqaiwfJXSaPJAkSSAAkqUU2nE20gmp5oo6JwH+eZ31EjJwB+eBn1K/AHnBWIfvwAZwACYAHsMy9cIMyFeEBTrIADYKSWLX1ipLXxgJLYgDoyeDIA+cFngAfwAVWfFdIcAB8B+f1tn+YJ/D+f5" s = s + "Poyf5xoojKAg" .Images(s) .Columns.Add("Column 1") With .Items local i i = .Add("Item 1") .CellImage(i, 0) = 1 i = .Add("Item 2") .CellImages(i, 0) = "2,3" EndWith .EndUpdate() EndWith

Send comments on this topic.

		Type	Description
		Handle as Variant	A long expression that identifies a handle to an Image list ( the Handle should be of HIMAGELIST type ) or a string expression that indicates the base64 encoded string that holds the icons list. Use the eximages tool to save your icons as base64 encoded format.