В данном примере демонстрируется, как отображаются графические объекты (изображения) с помощью контрола Image.

Для контрола listbox, который содержит имена файлов некоторой папки можно определить некоторые картинки, которые появятся слева от наименования файлов в списке. Для этого, в программном коде события InteractiveChange контрола listbox, нужно определить значение свойства Picture, как показано ниже:

	Копировать Код
* lstFiles.InteractiveChange cSelected = UPPER(THIS.List(THIS.ListIndex)) CD THIS.List(2) IF ".BMP"$cSelected OR ".ICO"$cSelected THISFORM.imgDisplay.Picture = THIS.List(2) + cSelected ENDIF

Задачи

Описание

Другие ссылки