Procedure On..CellFormat(X, Y : Integer; C : CellFormat)
Стиль ячейки

Обработчик On..CellFormat вызывается перед рисованием каждой ячейки таблицы на экране.

Аргументы X, Y содержат координаты ячейки на экране (0,0 - верхняя, левая ячейка).

Аргумент С содержит объект, свойства которого используются для рисования содержимого ячейки. Программист может изменять эти свойства.

C.Align : Integer	Выравнивание по горизонтали (0=Слева, 1=По центру, 2=Справа)
C.Image : String	Пиктограмма
C.VertAlign : Integer	Выравнивание по вертикали (0=Сверху, 1=По центру, 2=Снизу)
C.Color : Integer	Цвет текста
C.Background : Integer	Цвета фона ячейки
C.FontSize : Integer	Размер шрифта
C.FontFamily : String	Имя шрифта
C.FontBold : Boolean	Жирный шрифт
C.FontItalic : Boolean	Наклонный шрифт
C.Readonly : Boolean	Пользователь может редактировать ячейку
C.Text : String	Текст в ячейке

C.Readonly по умолчанию устанавливается в True, если на панели инструментов нет кнопки OPEN.

Пример:

Procedure OnDetailCellFormat(X, Y : Integer; C : CellFormat);
Begin                     
  // Красный шрифт в строке с отрицательной суммой
  If Detail[Y].Summa<0 Then C.Color := 0x0000FF; 
End;

Смотри: Кодирование цвета.

© RTIT