打印图片的问题
fk007 2008-09-20 04:07:35 var
jpg:TJpegImage;
FMemoryStream:TMemoryStream;
begin
jpg:= TJpegImage.Create;
FMemoryStream:= TMemoryStream.Create;
TBlobField(FieldByName('pic')).SaveToStream(FMemoryStream);
FMemoryStream.Position:= 0;
jpg.LoadFromStream(FMemoryStream);
self.QRImage1.Picture.Assign(jpg);
jpg.Free;
FMemoryStream.Free;
QuickRep6.PreviewModal;
end;
pic 是存照片的字段
我这样打印出来的照片有的是空的,有的还是有照片的 是怎么回事啊