画像をＢ５で印刷させるには？ (ID:116514)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ワタシだったら… （デカい画像を用紙にあわせて縮小印刷する、と仮定） １．ピクチャボックスに画像をロードし、縦横のサイズを取得 （ScaleHeight,ScaleWidth) ２．Printer.PapersizeをＢ５に設定し、印刷可能サイズを取得 （ScaleHeight,ScaleWidth) ３．縦、横のそれぞれの縮小率を計算し、小さいほうの率を採用 ４．PaintPictureで印刷 Ptrinter.PaintPicture Picture1, （左余白）,（上余白）, Picture1.Width * （縮小率）, Picture1.Height * （縮小率） ちなみにPrintFormはプリンタによって使用できない場合あり