Hallo,
Met onderstaande code print ik een aantal Bitmap's (uit BmpArr[I]) naar een pdf-bestand.
Ik zie als ik dat bestand opent alleen de laatste bitmap. Hoe los ik het op om alle bitmap's op verschillende bladzijde in het pdf-bestand te zien?
H.G. Frans
Code:procedure TForm1.LzW10Button10Click(Sender: TObject); // Printen Var R : TRect; I : Integer; begin //Printer.Orientation := poLandscape; printer.begindoc; R:=printer.canvas.cliprect; For I :=0 to Nummer do printer.canvas.stretchdraw(R,BmpArr[I]); printer.enddoc; end;
Bookmarks