StringGrid: Выделение и закрашивание

[mazdakilla]

Вот задачка появилась на мою голову. Как сделать чтобы при выделении ячеек на Stringgrid и нажатии например кнопки "Button", то что мы выделили закрасилась соответствующим цветом?

[Alter]

Непонятно что надо закрашивать(текст цветом, или ячейки).
По любому придётся отрисовывать всё вручную в Gride.
Используйте свойство Grid, называется DrawCell, используя Canvas для отрисовки.

Например:

procedure TForm1.SG1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
 WITH SG1 DO
 Begin
  IF (gdSelected in State) Then
  Canvas.Brush.Color := $00EFD3C6;
  Canvas.FillRect(Rect);

   IF Length(Cells[ACol, ARow])>0 Then
   begin
  Canvas.Font.Color := clBlue;
  Canvas.TextOut(Rect.Left, Rect.Top, Cells[ACol, ARow]);
   end;

 End;
end;