tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： Re^2: ショートカットフォルダのアイコン取得
投稿日： 2009/01/17(Sat) 21:23
投稿者： のぶ
オショウさん返信ありがとうございます。

説明が足りていませんでした。すいません。
今、エクスプローラを作成をつくっているのですが、Listviewにアイコンを表示したく作業
をしているところです。
フォルダとファイルに関連づいているアイコンを取得することができたのですが
フォルダのショートカットに関連ずいているアイコンを取得することができなく
悩んでいます。
エクスプローラなので、ダイアログは表示させたくないのです。。。

fName = e.Node.FullPath & "\" & sName2.name & "\"
'fName = LinkName & "\"

上記１行目がショートカットのディレクトリ
　　 ２行目がリンク先のディレクトリになっています。

　　 ２行目はうまくできたのですが、１行目だと同様のエラーになってしまいます。

hImgSmall = SHGetFileInfo(fName, 0, shinfo, Marshal.SizeOf(shinfo), SHGFI_ICON Or SHGFI_SMALLICON)

Dim myIcon As System.Drawing.Icon
myIcon = System.Drawing.Icon.FromHandle(shinfo.hIcon)

ImageList1.Images.Add(sName2.name, myIcon)
nIndex = nIndex + 1
item1.ImageKey = sName2.name
ListView1.Items.Add(item1)

うまく説明できなくてすいませんが、どうかご教授願いませんか？
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

古いスレッドにレスはつけられません。