如何在DBGRID中显示.bmp(100分)

  • 主题发起人 主题发起人 acheng_jy
  • 开始时间 开始时间
A

acheng_jy

Unregistered / Unconfirmed
GUEST, unregistred user!
已经把BMP图片存如ACCESS数据库中。能否在DBGRID中对应的字段中显示图片?
 
可以显示(在事件中自画),但是这么小显示出来不好看啊.
 
还是用第三方控件
 
to dz2050 用什么第三方控件?推荐一下。
 
DBGRID中对应的字段中显示图片
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
Bmp: TBitmap;
begin
if Column.Field = Table1IMAGE then
begin
try
Bmp := TBitmap.Create;
Bmp.Assign(Table1IMAGE);
DBGrid1.Canvas.StretchDraw(Rect,Bmp);
finally
Bmp.Free;
end;
end ;
end;
 
多人接受答案了。
 
后退
顶部