{"id":205,"date":"2007-05-12T17:01:32","date_gmt":"2007-05-12T15:01:32","guid":{"rendered":" http:\/\/www.nsonic.de\/blog\/2007\/05\/save-qreports-pages-as-bmp\/"},"modified":"2007-05-12T17:01:33","modified_gmt":"2007-05-12T15:01:33","slug":"save-qreports-pages-as-bmp","status":"publish","type":"post","link":"https:\/\/www.nsonic.de\/blog\/2007\/05\/save-qreports-pages-as-bmp\/","title":{"rendered":"Save QReports pages as BMP"},"content":{"rendered":"<p>The following code example will save You report in the &#8220;one page per BMP<br \/>\nfile&#8221; manner.<\/p>\n<p>[code lang=&#8221;delphi&#8221;]procedure TForm5.Button4Click(Sender: TObject);<br \/>\nvar BMP: TBitMap;<br \/>\n StoredUnits: TQRUnit;<br \/>\n   i: integer;<br \/>\n   StoreDir: string;<br \/>\nbegin<br \/>\n StoreDir:=&#8221;; {!!! Assign folder to store here (with ending &#8216;\\&#8217;), leave<br \/>\nblank to store in the .exe&#8217;s folder}<br \/>\n QuickRep1.Prepare;<br \/>\n   StoredUnits:=QuickRep1.Units;<br \/>\n   QuickRep1.Units:=Pixels;<br \/>\n   try<br \/>\n      for i:=1 to QuickRep1.QRPrinter.PageCount do begin<br \/>\n         BMP:=TBitMap.Create;<br \/>\n         try<br \/>\n            BMP.Width:=Round(QuickRep1.Page.Width);<br \/>\n            BMP.Height:=Round(QuickRep1.Page.Length);<br \/>\n            QuickRep1.QRPrinter.PageNumber:=i;<br \/>\n            BMP.Canvas.Draw(0, 0, QuickRep1.QRPrinter.Page);<br \/>\n            BMP.SaveToFile(StoreDir+&#8217;Page&#8217;+IntToStr(i)+&#8217;.bmp&#8217;);<br \/>\n         finally<br \/>\n            BMP.Free;<br \/>\n         end;<br \/>\n      end;<br \/>\n   finally<br \/>\n      QuickRep1.Units:=StoredUnits;<br \/>\n   end;<br \/>\nend;<br \/>\n[\/code]<\/p>\n<p>[tags]Delphi, Printing[\/tags]<\/p>\n","protected":false},"excerpt":{"rendered":"<p>The following code example will save You report in the &#8220;one page per BMP file&#8221; manner. [code lang=&#8221;delphi&#8221;]procedure TForm5.Button4Click(Sender: TObject); var BMP: TBitMap;&hellip;<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":""},"categories":[11],"tags":[75,119],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p71Tml-3j","_links":{"self":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/205"}],"collection":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/comments?post=205"}],"version-history":[{"count":0,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/205\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/media?parent=205"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/categories?post=205"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/tags?post=205"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}