Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

DBGridEh - выделение ячейки [D7]


Explorer ©   (2004-11-16 12:52:00) 

Мастера!
Подскажите, как по условию (например, если значение по столбцу в ячейке < 0) выделить ячейку (или несколько различных) другим цветом?
Полностью строку получается выделить,

if(QueryActiveDogovors.FieldByName('Dogovor').asInteger<0) then begin
 DBGridActiveDogovors.Canvas.Font.Color:=clRed;
end;

а вот как ячейку...


Rule   (2004-11-17 16:28:00) [1]

http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/dbgridcolor.htm
http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/mergegrid.htm
http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/nogrid.htm
http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/dbgridplus.htm
http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/grid.htm
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1022

и будет тебе счастье :?)


Соловьев   (2004-11-16 12:56:00) [2]

if Column.FieldName = 'Dogovor' then
if(QueryActiveDogovors.FieldByName('Dogovor').asInteger<0) then begin
DBGridActiveDogovors.Canvas.Font.Color:=clRed;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо