画像をＢ５で印刷させるには？

すうぴ 2004-09-26 07:13:06 No: 116512

画像をＢ５で印刷させたくて、FormPrintをしているんですが、どうもうまくいきません。Formを大きくして印刷しようとおもったのですが、ある程度しかおおきくならず、困っています。なにか方法を知っているかた、いませんか？ちょっと急ぎの用で、いましたら助けてください。お願いします。

Say 2004-09-26 19:44:16 No: 116513

>ちょっと急ぎの用で、いましたら助けてください。
本当に急いでいるのなら、いつ回答がつくかわからない無料の掲示板でなく、
どこかのソフトハウスあたりと有償契約を結んで、
確実にサポートが受けられるようにしたほうがいいでしょう。

http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200409/04090059.txt
のように回答に一週間かかる、というのもめずらしくありません。
(回答まで数年かかったケースも見たことがあります。
回答者がボランティアである以上、
こういうところに質問するときは「回答があればラッキー」ぐらいの
気持ちで気長に待つつもりでいたほうがいいでしょう。)

ところで、
「FormPrint」ってドイツ製オフセット輪転機？
http://www.jpforms.net/edelmann%20formall/formprint_specs.htm
とかコンパック製プリンタドライバ?
https://sw.vector.co.jp/swreg/detail.info?srno=SR013976&site=y
ではないですよね？
(もし、輪転機やプリンタドライバの質問でしたら、
メーカに問い合わせたほうが早いでしょう。)

もし、PrintFormメソッドのことを言っているのなら、
「急いでいる」のならなおさらあわてず、
投稿前によく見直すことをお奨めします。

それはさておき、(PrintFormの質問という前提で進めると)
PrintForm自体、たいしたことできませんので、
自前でキャプチャーしてPrinterオブジェクト経由で
印刷したほうがいいでしょう。

水無月 2004-09-28 09:38:50 No: 116514

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

ちなみにPrintFormはプリンタによって使用できない場合あり

水無月 2004-09-28 09:40:19 No: 116515

↑↑↑
すんません
×Ptrinter.
○Printer.

すうぴ 2004-09-29 05:51:37 No: 116516

Ｓａｙさん、水無月さん、ありがとうございました。ぜひやってみます！