[アプリケーションの追加と削除] の情報 (ID:100804)

名前

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

本文

K.J.K.さん、ご回答ありがとうございます。
いろいろ弄ってる内にCoCreateInstanceの宣言が
抜けてました。

Private Declare Function CoCreateInstance Lib "ole32" _
        (rclsid As Any, ByVal pUnkOuter As Long, _
        ByVal dwClsContext As Long, riid As Any, _
        ppv As Any) As Long
        
IIDFromStringの呼び出しも勉強になりました。

> > Private Type tag_ShellAppCategoryList
> >     cCategories As Long
> >     pCategory As tag_ShellAppCategory
> > End Type
> 
> pCategory As Long にすべきですよね。

'ShellAppManager::GetPublishedAppCategories
    hr = Invoke_(ObjPtr(p), 5, VarPtr(pCategoryList))
    
に変更してもE_NOTIMPLなので、
他の項目を列挙するならやっぱり、タイプライブラリですね。
 (IEnumInstalledApps::Nextで列挙してる内に
 エクセルが落ちてしまうのもありますので)

> > 使えるケースと使えないケースの区別がつくならば別ですが、
> > その判断には(コードで記述できるような)一般性がありませんし。
> 
> とは言っても、判定式そのものは短いコードで書くことが可能です。

使えない場面が今の私のレベルでは分かりませんので
以後、勉強します。

> ちなみに、DispCallFuncを使う元のサンプルは、大人向けを想定しています。
> それを利用してうまく行かないことがあったら人に尋ねるような子供に
> 対しては利用することを考慮しておりません。
> # そもそも、他の人に訊くような段階では、利より害のが多いので、裏に設置。

大変、有用なサンプルまで書いて頂きながら
あれこれ、甘えた発言ですみませんでした。＜(_ _)＞

最初の、2008/06/18(水) 09:52:20 でリンクしてた
> http://moug.net/faq/viewtopic.php?t=28970
サイトの質問者さんにも参考になると思うので
そちらのサイトで、
追加スレッドを立てて、リンクを張ってもいいでしょうか？
 (そちらでは解決後、追加書き込みは出来ませんので)
# 半年程でそちらでは、過去ログは参照出来なくなります。

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

戻る