ITabCellStyle.NormalPicture

Синтаксис

NormalPicture: Integer;

Описание

Свойство NormalPicture определяет индекс изображения, которое будет отображаться в ячейке таблицы.

Комментарии

Коллекция изображений таблицы доступна в свойстве Images. Для использования изображений в ячейке необходимо, чтобы свойству EnablePictures было установлено значение TriState.OnOption.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «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». Для выделенного диапазона ячеек в обычном режиме будет отображаться первое изображение из набора.

См. также:

ITabCellStyle