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

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

Как изменить цвет шрифта в StringGrid?

Max Ivanych ©   (2004-11-23 11:15:00) 

Делаю так:
s:=sgCompanies.Cells[ACol,ARow];
if (frmMain.rgSearch.ItemIndex=2) and (AddressEmpty='')and(ARow>0) then
 begin
 sgCompanies.Canvas.Font.Color:=clGray;
 sgCompanies.Canvas.FillRect(Rect);
 end
else
 begin
 sgCompanies.Canvas.Font.Color:=clBlack;
 sgCompanies.Canvas.FillRect(Rect);
 end;
 sgCompanies.Canvas.TextOut(Rect.Left+4,Rect.Top+5,s);
Результат: все записи отображаются серым. Проверил - проход через   else присутствует. В чем я не прав? Заранее спасибо!

---

Ascan   (2004-11-24 11:49:00) [1]

А ты не пробывал использовать OnDrawColumnCell?

---

Наверх