SHGetFileInfo 関数を使用して、Visual Basic 内のファイルに関連付けられたアイコンを取得する方法NET

文書翻訳 文書翻訳
文書番号: 319340
マイクロソフト ビジュアルを C#。この資料のバージョンを NET を参照してください。 319350.
すべて展開する | すべて折りたたむ

目次

概要

この資料の方法を使用するのには、 SHGetFileInfo ファイルに関連付けられたアイコンを取得するには、[関数] をクリックします。

Windows フォーム アプリケーションを作成します。

  1. Microsoft Visual Studio を起動します。NET。
  2. で、 ファイル メニューのポイント 新しい、し プロジェクト.
  3. で、 新しいプロジェクト ダイアログ ボックス、クリックして Visual Basic プロジェクト 下にあります。 [プロジェクトの種類、し Windows アプリケーション 下にあります。 テンプレート.
  4. で、 名前 ボックスの種類 GetIconSample.

SHGetFileInfo 関数を使用します。

  1. Form1.vb ファイルの先頭に次のコードを追加します。
    Imports System.Runtime.InteropServices
    					
  2. 次のコードを追加、 Form1 クラスの後、 継承 ステートメントです。
    Private Structure SHFILEINFO
            Public hIcon As IntPtr ' : icon
            Public iIcon As Integer ' : icondex
            Public dwAttributes As Integer ' : SFGAO_ flags
            <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=260)> _
            Public szDisplayName As String
            <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=80)> _
            Public szTypeName As String
    End Structure
    
    Private Declare Ansi Function SHGetFileInfo Lib "shell32.dll" (ByVal pszPath As String, _
    ByVal dwFileAttributes As Integer, ByRef psfi As SHFILEINFO, ByVal cbFileInfo As Integer, _
    ByVal uFlags As Integer) As IntPtr
    
    Private Const SHGFI_ICON = &H100
    Private Const SHGFI_SMALLICON = &H1
    Private Const SHGFI_LARGEICON = &H0         ' Large icon
    Private nIndex = 0
    					
  3. 追加します。 リスト ビュー コントロールは、 ボタン コントロールとは イメージ リスト フォームを制御します。既定の名前は、ListView1、Button1、および ImageList1 それぞれです。
  4. [プロパティ] ウィンドウで Button1、ボタン テキストを設定するには ファイルを選択します。、し、次のコードを追加、 Button1_click イベント:
    Dim hImgSmall As IntPtr  'The handle to the system image list.
    Dim hImgLarge As IntPtr  'The handle to the system image list.
    Dim fName As String      'The file name to get the icon from.
    Dim shinfo As SHFILEINFO
    shinfo = New SHFILEINFO()
    Dim openFileDialog1 As OpenFileDialog
    openFileDialog1 = New OpenFileDialog()
    
    openFileDialog1.InitialDirectory = "c:\temp\"
    openFileDialog1.Filter = "All files (*.*)|*.*"
    openFileDialog1.FilterIndex = 2
    openFileDialog1.RestoreDirectory = True
    
    listView1.SmallImageList = imageList1
    listView1.LargeImageList = ImageList1
    
    shinfo.szDisplayName = New String(Chr(0), 260)
    shinfo.szTypeName = New String(Chr(0), 80)
    
    If (openFileDialog1.ShowDialog() = DialogResult.OK) Then
         fName = openFileDialog1.FileName
    
         'Use this to get the small icon.
         hImgSmall = SHGetFileInfo(fName, 0, shinfo, Marshal.SizeOf(shinfo), _
             SHGFI_ICON Or SHGFI_SMALLICON)
    
         'Use this to get the large icon.
         'hImgLarge = SHGetFileInfo(fName, 0, 
         'ref shinfo, (uint)Marshal.SizeOf(shinfo), 
         'SHGFI_ICON | SHGFI_LARGEICON);
    
         'The icon is returned in the hIcon member of the shinfo struct.
         Dim myIcon As System.Drawing.Icon
         myIcon = System.Drawing.Icon.FromHandle(shinfo.hIcon)
    
         imageList1.Images.Add(myIcon) 'Add icon to imageList.
    
         listView1.Items.Add(fName, nIndex) 'Add file name and icon to listview.
         nIndex = nIndex + 1
    End If
    					

プロジェクトを実行します。

  1. プロジェクトをコンパイル: には ビルド メニューをクリックして ソリューションをビルドします。.
  2. F5 キーを押してプロジェクトを実行します。
  3. クリックしてください。 ファイルを選択します。、、のファイルを選択し、 ファイルを開く ダイアログ ボックスです。ファイルとファイルに関連付けられたアイコンの名前を表示するのには リスト ビュー コントロールです。

関連情報

その他の情報では、Microsoft Visual C#。バージョンこの資料の NET は、「サポート技術情報」資料を参照するには、次の文書番号をクリックします。
319350 SHGetFileInfo 関数を使用して、Visual C# 内のファイルに関連付けられたアイコンを取得する方法NET

プロパティ

文書番号: 319340 - 最終更新日: 2011年7月27日 - リビジョン: 4.0
キーワード:?
kbhowtomaster kbmt KB319340 KbMtja
機械翻訳の免責
重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。
英語版 KB:319340
Microsoft Knowledge Base の免責: Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。

フィードバック

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com