printing bitmap from Imagelist


2003-07-03 05:49:11 PM
delphi34
Hi,
i want to print the Bitmaps from Imagelist,
with Printer do begin
BeginDoc;
bm:= TBitmap.Create;
ImageList1.GetBitmap(0,bm);
Canvas.Draw(100,100,b1);
EndDoc;
end;
which does not work!
But if i use "bm.LoadfromFile('b1.bmp')", and load the bitmap, it works
properly.
or when i save the bitmap in to a file an load it again, works too
with Printer do begin
Begindoc;
bm:= TBitmap.Create;
ImageList1.GetBitmap(0,bm);
bm.SavetoFile('b1.bmp');
bm.LoadfromFile('b1.bmp');
Canvas.Draw(100,100,b1);
EndDoc;
end;
any idea?
Hassan