Разноцветный DrawGrid

[Andr]

Кок ПРОГРАММНО закрасить нужную ячейку определенным цветом?

[pu4koff]

Закраска выделенной ячейки красным цветом
DrawGrid1.canvas.Brush.Color := clRed;
DrawGrid1.canvas.FillRect(DrawGrid1 .CellRect(DrawGrid1.Col,DrawGrid1.R ow));
ЗЫ. только потом она перекрасится назад, когда произойдет перерисовка ячейки. чтобы этого не было, обрабатываешь OnDrawCell и там пишешь закраску. например, этот код тоже закрашивает выделенную ячейку:
if (Acol = drawGrid1.Col)and(Arow = drawgrid1.row)then
begin
DrawGrid1.canvas.Brush.Color := clRed;
DrawGrid1.canvas.FillRect(Rect));
end;

[Andr]

Работает!, спасибо огромное

[Albert2008]

Не работает.
Ошибки возле
Acol, Arow, Rect - пишет, что это что-то неизвестное.

[Serge_Bliznykov]

обрабатываешь OnDrawCell

Альберт, это код нужно повесить на событие (event) OnDrawCell
выбери DrawGrid1 в инспекторе объектов (object inspector) закладка Events - там двойной щелчок по свободному месту справа от OnDrawCell ...

[Albert2008]

Благодарю. Всё получилось. В коде есть маленькие ошибочки, но для их преодоления моего разума вполне хватило.

[Albert2008]

ЗЫ. только потом она перекрасится назад, когда произойдет перерисовка ячейки. чтобы этого не было, обрабатываешь OnDrawCell и там пишешь закраску. например, этот код тоже закрашивает выделенную ячейку:


=================================== ============
После испробывания ВСЕХ видов приведенного кода, после того как щёлкаешь на новую ячейку - старая опять переркашивается в белый цвет. А что можно сделать чтобы она так и осталась бы красной ?

[mutabor]

А что можно сделать чтобы она так и осталась бы красной ?

Постоянно (при каждой отрисовке) перекрашивать ее, все по тому же событию OnDrawCell, нужно помнить для этого ее номер.

[Банзай]

вот такой вот вопрос созрел:
как в DrawGride отключить обрамление выбранной ячейки дот каемкой?

[Stilet]

как в DrawGride отключить обрамление выбранной ячейки дот каемкой?

Перерисуй ее, и не отрисовывай каемку.