Советы по Delphi
Dbgrid с цветными ячейками II
Есть ли какой-либо способ придать ячейке DBGrid другой цвет? Мне хотелось бы выделить отдельные ячейки строки по определенному признаку. Типа флага, который, если если счет просрочен свыше 90 дней, делает строчку красной. Буду благодарен за любую помощь.
Обработайте событие OnDrawDataCell. Вот пример, который использует демонстрационную таблицу COUNTRY и рисует текст красным цветом во всех строках, содержащих страны с населением свыше 10 миллионов человек:
| begin if Table1.FieldByName('Population').AsFloat < 10000000 then DBGrid1.Canvas.Font.Color := clRed; dbGrid1.DefaultDrawDataCell(Rect,Field,State); end; |
[000403]
