Problem print bitmap URGENT !!!
Hello all
I use reportbuilder 7.02 yet. Some time, when print an image, the print
black box. Why ?
Best Regards,
Franco
Example of code in runtime:
if not q.FieldByName('MYIMAGE').IsNull then
begin
//
bmp := TBitmap.Create;
stMem := TMemoryStream.Create;
//
try
TBlobField(q.FieldByName('MYIMAGE'')).SaveToStream(stMem);
stMem.Position := 0;
bmp.LoadFromStream(stMem);
// The pMyImage is TppImage;
pMyImage.Picture := nil;
pMyImage.Picture.Assign(bmp);
finally
stMem.Free;
bmp.Free;
end;
//
end
I use reportbuilder 7.02 yet. Some time, when print an image, the print
black box. Why ?
Best Regards,
Franco
Example of code in runtime:
if not q.FieldByName('MYIMAGE').IsNull then
begin
//
bmp := TBitmap.Create;
stMem := TMemoryStream.Create;
//
try
TBlobField(q.FieldByName('MYIMAGE'')).SaveToStream(stMem);
stMem.Position := 0;
bmp.LoadFromStream(stMem);
// The pMyImage is TppImage;
pMyImage.Picture := nil;
pMyImage.Picture.Assign(bmp);
finally
stMem.Free;
bmp.Free;
end;
//
end
This discussion has been closed.
Comments
Ed Dressel
Team DM
This is a known issue that has been addressed for later releases. Try
upgrading to RB 7.04 and see if that solves the issue. For upgrade
instructions, send your serial number and purchasing email address to
info@digital-metaphors.com.
--
Regards,
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com