![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Есть список (Memo) с информацией. Нужно ее найти в Stringgrid и закрасить.
Подскажите как это сделать??? |
#2
|
||||
|
||||
![]() Переопределить событие OnDrawCell
Код:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin StringGrid1.Canvas.Brush.Color:=clRed; if ((ACol=1)and(ARow=1)) then StringGrid1.Canvas.FillRect(Rect); end; Данный код закрашивает ячейку с координатами (1, 1) Невозможно заточить карандаш тупым топором. Столь же тщетно пытаться сделать это десятком тупых топоров |