ＶＣのexeからＶＢのActiveX DLLを呼んでフォームをモーダル表示

解決

---

先日、
Activex DLLのイベントを拾うには？
という質問
http://madia.world.coocan.jp/cgi-bin/Vcbbs/wwwlng.cgi?print+200604/06040044.txt
で回答いただきました。

おかげさまで、ＶＢ6.0で作ったActiveX DLLを、ＶＣ6.0のMFCで作ったexeから呼んでDLL内のフォームを表示し、そこでの発生イベントをＶＣのexe側で拾うこともできるようになりました。

ただ、そのActiveX DLL内のフォームをモーダルで表示した場合はうまくいくのですが、モーダレスで表示しようとすると、実行時エラーが起こってしまいます。

具体的には、

「
"実行時エラー '406': ActiveX DLL、ActiveX コントロール、またはプロパティ ページからこのホスト アプリケーションにモードレスフォームを表示することはできません。
」

というエラーです。
ActiveX DLL内で、フォームオブジェクトをshowメソッドで表示しようとしているところで発生します。

Set m_objfrmSampleX = New FrmSampleX
m_objfrmSampleX.Show vbModeless      ←ここで発生★


なお、
http://support.microsoft.com/?scid=kb;ja;233997&spid=3042&sid=88
を見て、

「
ActiveX DLL プロジェクトのプロパティ フォームで、[全般] タブにある [スレッド モデル] の値を [シングル スレッド] に変更します。その ActiveX DLL を再コンパイルし、MTS パッケージに配置し直します。
」

という解決方法を試してみたのですが、症状は変わりませんでした。
（「MTS パッケージに配置し直します」という部分がよくわからなかったので、ただビルドし直して、DLLを差し替えただけですが・・・）

ちなみに、ＶＢで作ったexeで、同ActiveX DLLを呼んだ場合は、モーダルでもモーダレスでもうまく行きます。 
なので残るはＶＣの問題なのかなと思い、こちらに投稿させて頂きました。


OSはWindowsXPです。
宜しくお願い致します。

編集 削除

---

表題は、「モーダル表示」となっていますが、「モーダレス表示するには？」が正しいです。すみません。

編集 削除

---

これが近い内容でしょうか？
http://www.hey-to.net/ML-archive/vcppML/1999/msg05898.html

編集 削除

---

リンク先のKBにもありますが
まずはVB側でApp.NonModalAllowedをチェックしてみてください。
もしかしたらですが、
MTS以外にもこのKBに該当するライブラリが
読み込まれてるのかもしれません。

*MTS(Microsoft Transaction Server)らしい。IISに同梱されてる模様。

編集 削除

---

はい、ＶＢ製のActiveX DLL側でApp.NonModalAllowedを見てはみたのですが、falseになっていました。

ただし、ＶＢで作ったexeから呼び出した場合、同じActiveX DLLの場所でログを出してもtrueになっていました。

やはりＶＣのexeからの呼び出しだとだめなようです。

編集 削除

---

MTSのほうは確認できました？
mmcでスナップインの追加にMTS関連のものが出ればMTSが
インストールされていると思われますので確認してみてください。

MTSでないとすれば後は他社製のライブラリを使っていないかとか
スレッドモデルが適切かとかかなぁ。。。
単純にメッセージポンプのスレッドがどこにあるかとか
そういう話なのかもしれませんが。。。

手元に現象を確認できる環境がないため、
私からはこれ以上はなんとも言えません。
識者の降臨を祈ります。

編集 削除

---

ありがとうございます。

mmcというのは初めて使ったのですが、特にMTS〜のような名前のものは追加候補に現れませんでした。
Microsoft Transaction Serverというのもありませんでした。

ところで、ここで言うKBとはどういう意味でしょうか？

編集 削除

---

KB = Knowledge Base
Microsoftでは「サポート技術情報」と訳していますね。

編集 削除

---

kureありがとうございます。


なお、
ＶＣのexeからＶＢのActiveX DLLを呼んでフォームをモーダレス表示する方法
の件に関しては未だ回答募集中です。

編集 削除

---

http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpdnaskdr/htm/drgui54.asp

上記ＵＲＬの中ほど、
「ダイアログの不人情な様式」
という部分で、
同じような症状が、ActiveX DLLをActiveX EXEにすることで回避できるという話が出ています。

ＶＣからのActiveX EXEの利用法は、
以前kureさんにご指導いただいた、
http://madia.world.coocan.jp/cgi-bin/Vcbbs/wwwlng.cgi?print+200604/06040044.txt
と同様で良いのでしょうか？

編集 削除

---

Yes.

基本的にはなにも変わりません。
ActiveXを作る際のモード（オプション）とGUIDが再生成される
くらいで使う（VC++)側はそのままで大丈夫だと思いますよ。

編集 削除

---

ありがとうございます。

該当のActiveX DLLをバイナリ互換でActiveX EXEとしてビルドし直し、置き換えるだけでできました。
モードレス表示もイベント取得もうまくいっています。

ただ、画面終了時にクラスの
ReleaseDispatch
や
delete
や
IConnectionPointのUnadvise
や
IConnectionPointContainerのRelease
や
CoUninitialize
を行っているのですが、該当のActiveX EXEがタスクマネージャに残ったままになってしまいます。

何か後処理が足りないのでしょうか？

編集 削除

---

VB側で非表示のフォームが残ってたり
解放漏れがあったりしませんか？

編集 削除

---

ありがとうございます。
無駄なフォーム呼び出しがありました。
無くしたら残らなくなりました。

別の問題が残っているのですが、それは別途スレ立てました。
http://madia.world.coocan.jp/cgi-bin/Vcbbs/wwwlng.cgi?print+200605/06050042.txt

編集 削除

---

名前

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

本文

←解決時は質問者本人がここをチェックしてください。

返信する