level 1
var
Stream : TMemoryStream;
begin
.............
Stream := TMemoryStream.Create;
img.SaveToStream(stream);
Stream.Position := 0;
................
TBlobField(qryTemp.FieldByName('Report')).LoadFromStream(Stream);
qryTemp.Post;
end;
2015年09月16日 09点09分