从ORACLE的一BLOB字段中读出JPEG图片并通过TIMAGE显示,不知道为什么总是说ACCESS VIOLATION
procedure TForm1.ADOQuery2AfterOpen(DataSet: TDataSet);
var
tmpstream : tmemorystream;
begin
tmpstream:=tmemorystream.Create;
tblobfield(adoquery2.Fields[0]).SaveToStream(tmpstream);
tmpstream.Position:=0;
image1.Picture.graphic.LoadFromStream(tmpstream);
tmpstream.Free;
end;
procedure TForm1.ADOQuery2AfterOpen(DataSet: TDataSet);
var
tmpstream : tmemorystream;
begin
tmpstream:=tmemorystream.Create;
tblobfield(adoquery2.Fields[0]).SaveToStream(tmpstream);
tmpstream.Position:=0;
image1.Picture.graphic.LoadFromStream(tmpstream);
tmpstream.Free;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货