EnablePictures: TriState;
Свойство EnablePictures определяет признак использования изображений в ячейке таблицы.
Если для данного свойства установлено значение TriState.OnOption, то в ячейках, использующих данный стиль, будет возможность установить изображения. Индексы изображений, отображаемые при различных состояниях, задаются в свойствах NormalPicture, HoverPicture, PushedPicture. В свойстве BackgroundPicture можно задать индекс изображения, используемого в качестве фона ячейки. Все используемые изображения должны быть загружены в коллекцию Images таблицы.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox, компонента UiTabSheet с наименованием «UiTabSheet1» и компонента ImageList с наименованием «ImageList1». «UiTabSheet1» является источником данных для компонента TabSheetBox. В компонент «ImageList1» загружен какой-либо набор изображений.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
TSheet: ITabSheet;
TRange: ITabRange;
Style: ITabCellStyle;
Begin
TSheet := UiTabSheet1.TabSheet;
TSheet.Images.AddFromImageList(ImageList1);
TRange := TSheet.View.Selection.Range;
Style := TRange.Style;
Style.EnablePictures := TriState.OnOption;
Style.NormalPicture := 0;
End Sub Button1OnClick;
При нажатии на кнопку в коллекцию изображений таблицы будут добавлены изображения компонента «ImageList1». Для выделенного диапазона ячеек в обычном режиме будет отображаться первое изображение из набора.
См. также: