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

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

Выделение ячейки в StringGrid


Azazello ©   (2004-11-17 09:19:00) 

Доброе время суток.
Можно ли в таблице (StringGrid) по какому-либо условию сделать в отдельной ячейке другой цвет шрифта?


novice_man   (2004-11-17 10:07:00) [1]

procedure TForm1.StringGridDrawCell(Sender: TObject; vCol, vRow: Longint; Rect: TRect;   State: TGridDrawState);
begin
StringGrid.Canvas.Brush.Color := Color;
StringGrid.Canvas.Font.Color  := Font.Color;
StringGrid.Canvas.FillRect(Rect);
StringGrid.Canvas.TextOut(Rect.Left + 1, Rect.Top + 1,  
    StringGrid.Cells[ACol, ARow]);
end;

Примерно так.


novice_man   (2004-11-17 09:59:00) [2]

Можно.


Наиль   (2004-11-17 09:44:00) [3]

В StringGrid есть событие onDrawCell в нём можно используя ARow, ACol задать условие, а Rect можно использовать в  StringGrid1.Canvas.TextRect(). Предварительно не забудь написать StringGrid1.Canvas.Font.Color:=clЦвет


Наверх

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