Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

dbgrid и defaultdrawing [D7, WinXP]

Ugrael © (2005-11-03 11:36:00)
Доброго времени суток.
Есть база. есть форма для вывода ( dbgrid ).
Есть необходимость при значении поля p1=4 ( в dbgrid не выводится ) пометить или всю строку или определенную ячейку красным цветом.
Что делаю: у dbgrid defaultdrawing=false. в событие OnDrawDataCell пишу такой код
if (glav.RegDataSet.FieldByName('pol_stat').AsString='4')or(glav.RegDataSet.FieldByName('pol_stat').AsString='5') then
glav.RegDBGrid.Canvas.Font.Color := clRed;
glav.RegDBGrid.DefaultDrawDataCell(Rect,Field,State);
и ничего не происходит....

Плохиш (2005-11-03 11:52:00) [1]
Значит условие не выполняется.

PS. На будущее:
1. Указатель на перерисовываемый грид передаётся в параметре Sender
2. Указатель на экземпляр формы, для которой вызван метод, находится в переменной Self.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »