バーコードのイメージ化 (ID:84507)

名前

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

本文 > バーコードを貼り付けた後にTureにしても結果は同じで > 外枠だけがコピーされる状態になってしまいます。 Imageプロパティにて取得できるのは、 AutoRedraw = True 状態の時に描画された内容だけです。 False状態の時に描画しても、BackColor/Pictureで設定された 背景色/画像しか出力されませんよ。 以下、VB6のヘルプより: 《Image プロパティ》 | 継続表示属性を持つグラフィックスに対応するハンドルを返します。 | ハンドルの値は、Microsoft Windows によって自動的に設定されます。 (中略) | AutoRedraw プロパティが真 (True) に設定されていて、描画された | グラフィックスが存在しない場合は、BackColor プロパティで | 設定された色とピクチャだけが表示されます。 > AutoRedrawをTrueではバーコードを貼り付ける事ができなく …できませんでしたか? 実際、当方で試してみて、画像をペイントに クリップボードに貼り付けられる事を確認しているのですが。。。 (なお、PictureBoxは Visible = False でも OK のはずです) If H = 0 Then Clipboard.Clear Clipboard.SetData Picture1.Image, vbCFBitmap Else Err.Raise H End If ところで、AutoRedraw = True の場合、APIで描いた内容は、 画面には反映されないのですが、その事は認識しておられますか? APIによる描画の場合、VBのメソッドで描画した時と違って、 「描画した」という通知が、PictureBoxに渡されないため Picture1.Refresh を呼び出すなどして、強制的/暗黙的に再描画を 指示しないと、画面には反映されません。 しかし、画面に反映されずとも、デバイスコンテキストには 反映されていますので、Refreshせずとも、 Clipboard.SetData Picture1.Image, vbCFBitmap を使うことはできるはずです…が、どうしても駄目だった、という事であれば、 その前に回答した、次案の「KBの161299」を試して見てください。 》 魔界の仮面弁士 2004/07/14(水) 15:56:18 > とりあえず、OleDraw API で、デバイスコンテキストに描画してみるとか。 > それでも駄目なら、KBの161299あたりを参考にして、画面イメージを取り込むとか。。。