投稿日 | : 2003/06/30(Mon) 19:27 |
投稿者 | : 大きなのっぽさん |
Eメール | : |
URL | : |
タイトル | : Windows2000で印刷すると・・ |
初めての投稿です。
今、VBを使って印刷をする初歩的なプログラムを作っています。
内容は、花ちゃんさんのソースをもろ参考に(ぱちくって・・・)頑張っています。
文章苦手で、気の利いたことも言えないので、質問をさっくり書きます。
質問:windows2000でVBするとおかしくなります。
windows2000にVB6.0(sp5)をインストールして開発しています。
内容は、先程も書きました印刷プログラムです。
ソースは、
******************************************
With Picture1
.AutoSize = True
.ScaleMode = vbTwips
.Picture = LoadPicture("ここに画像のアドレスを")
.Visible = False
.AutoRedraw = True
.ScaleMode = vbCharacters
.CurrentX = 4
.CurrentY = 1
'.ForeColor = QBColor(4)
.FontName = "MS 明朝"
.fontsize = 11
.FontBold = True
Picture1.Print "花ちゃん大好き"
.ScaleMode = vbTwips
End With
Printer.PaintPicture Picture1.Image, 0, 0, Printer.Width, Printer.Height
**********************************************
といった内容です。
この内容で、BMPファイルを読み込み、プリンターに印刷します。
※画像はモノクロ画像、A3くらいのサイズです。
印刷に使うプリンターはキャノンのLBP−1610です。
実際に実行してみると印刷はできます。
ですが、印刷する時にスプールに溜まるサイズが非常に大きいです。
実際のファイルは500kほどで、プログラムを通ると3.8Mに!
ですので、プリンタもたじたじで、印刷速度は一分間に4枚ペースです・・・
ところが、カラープリンターで出力すると70kに!
さくさく出てきます。(プリンタはLBP−2810)
プリンタの設定かと思っていろいろ触ったのですが、どうも違うようです。
しょうがないので、違うOSで試したところ、windows98では問題なく
さくさく出ました。
これは、windows2000で出すから発生してるのだ!っと思ったのですが、
VBマスターのみなさま、どうなのでしょう・・
もし対応作がありましたら教えていただきたいです。
ながながと質問してしまい、申し訳ありません。