VB6.0でユーザーコントロールを作成しているのですが
ユーザーコントロール内のピクチャーボックスの内容を簡単に印刷する方法ってありますか?
内容は画像でなく、全てPrintメソッドにて書いたテキストです
よろしくお願いします
Printメソッドで書いた文字であろうと、
PictureBoxに書いたものはすべて画像になります。
普通のペイントソフトを見てみればわかるとおり、
Printメソッドは、フォントの形をしたスタンプはりつけているわけです。
通常、プリント部分は独立した関数にします。
Private Function fncPrint(obj As Object) As Boolean
obj.ScaleMode = vbPoints
obj.Font.Size = 10
obj.CurrentX = 10
obj.CurrentY = 10
obj.Print "あいうえお"
.....
End Function
PictureBoxに表示するときは
Call fncPrint(Picture1)
印刷するときは
Call fncPrint(Printer)
Printer.EndDoc
とします。
たかみちえさん、Sayさん回答ありがとうございます
一度ピクチャーボックスに書きこんだものを、なにか一発メソッドを呼べば印刷できるかな?
と思って質問させて頂きました
Sayさんの方法でやってみます
ありがとうございました