[delphi.com.ar]

Yo recuerdo haber contestado con un código similar a este código:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;  Rect: TRect; State: TGridDrawState);
begin
  if (ACol = 0) and (ARow = 0) Then
    StringGrid1.Canvas.StretchDraw( Rect, Image1.Picture.Graphic );
end;

En un DBGrid podes sobreescribir el método DrawCell.

Suerte!