DOBON.NET DOBON.NETプログラミング掲示板過去ログ

OLE組み込みオブジェクトについて

  • 題名: OLE組み込みオブジェクトについて
  • 著者: kame
  • 日時: 2006/11/17 12:04:57
  • ID: 18263
  • この記事の返信元:
    • （なし）
  • この記事への返信:
    • （なし）
  • ツリーを表示
環境/言語:[VB6]
分類:[VB6以前]

初めて投稿させてもらいます。

VB6でMDI子フォームにOLEコントロールを貼り付け、
.class=Paint.Pictureと設定して下記のソースで、
OLEをクリックするとペイント(mspaint)が組み込まれるのですが、
テキスト入力を選んで「書式バー」を表示してもフォーカスが移らず、
フォント等を選択できません。

回避方法があれば教えてもらえないでしょうか。

ちなみにVB4だとこの現象は起こりません。

Private Sub Form_Load()
picD.Picture = picD.Image
SavePicture picD, Environ("TEMP") & "\test.bmp"
OLE1.CreateEmbed Environ("TEMP") & "\test.bmp"
Kill Environ("TEMP") & "\test.bmp"
End Sub

Private Sub OLE1_Click()
OLE1.DoVerb (vbOLEShow)
OLE1.Refresh
DoEvents
End Sub
DOBON.NET | プログラミング道 | プログラミング掲示板