Раскрасить ячейки в гриде Delphi

[PLP]

Приветствую, подскажите пожалуйста, как можно раскрасить ячейки в StringGrid в Delphi.

или может лучше какой-нибудь другой компонентой воспользоваться?

Насколько я помню есть пример прямо в хелпе по Delphi. Перекрашивание там основано на переопределении метода OnPaint.

[Mazzi]

Для раскрашивания можно использовать событие OnDrawCell. Для раскрашивания можно использовать событие OnDrawCell.пример вот код расскрашивает все ячейки в желтый цвет.

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var
  ACanvas:TCanvas;
begin
  ACanvas := StringGrid1.Canvas;
  ACanvas.Brush.Color := clYellow;
  ACanvas.FillRect(Rect);
end;

[PLP]

Благодарю.
Если правильно понимаю, просто на месте ячейки закрашивается прямоугольничек на канве грида. Соответственно текст, содержащийся в ячейке перестанет быть виден, и его нужно выводить "руками" мет. TextOut?

ЗЫ: А зачем использовать var ACanvas : TCanvas; , а не просто StringGrid1.Canvas?

Сообщение от PLP

Если правильно понимаю, просто на месте ячейки закрашивается прямоугольничек на канве грида. Соответственно текст, содержащийся в ячейке перестанет быть виден, и его нужно выводить "руками" мет. TextOut?

Естесственно, все самому нужно теперь писать, раз метод переопределяется

[Mazzi]

Alexandr 172 правильно говорит.

ЗЫ: А зачем использовать var ACanvas : TCanvas; , а не просто StringGrid1.Canvas?

а это апросто так :-)