| 投稿日 | ： 2007/02/16(Fri) 11:55 |
| 投稿者 | ： BT6 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: RichTextBoxへのビットマップの貼り付け |
> 実際には、こんな事していませんよね。
> ここへ掲載する場合は、間違いのないように実際に使っているコードをコピー＆ペースト
> して掲載して下さい。
確かに違っています。（カンマが1つ多いですね。）
失礼しました。
実際のコードは下のようになっています。
Call SavePicture(picTemp.Image, App.Path & "\pic.bmp")
RichTextBox.OLEObjects.Add , , App.Path & "\pic.bmp"
Call Kill(App.Path & "\pic.bmp")
RichTextBox.SelStart = Len(.Text)
> 単に表示したいだけなら、クリップボード経由で貼り付けるとかすればいいのでは。
ご提示頂いたサンプル・コードでうまく行きました。
ありがとうございます。