Mostrar imagen/foto en DBgrid

[ecfisa]

Hola Daniel.

Te agrego una opción más a las que te señaló Casimiro.

Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  with TStringGrid(DBGrid1) do
  begin
    DefaultRowHeight := 60; // alto de filas a gusto
    RowHeights[0]    := 25;  // alto de título
  end;
  DBGrid1.Options := DBGrid1.Options - [dgColumnResize]; // columnas fijas
end;

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if ( Column.FieldName = 'GRAPHIC' ) then
    with TPicture.Create do
    try
      Assign( Column.Field );
      DBGrid1.Canvas.StretchDraw( Rect, BitMap );
    finally
      Free;
    end;
end;

Muestra del ejemplo:



Saludos