方法 : Windows フォームの ImageList コンポーネントにイメージを追加または削除する

[アーティクル]
09/17/2008

更新 : 2007 年 11 月

Windows フォームの ImageList コンポーネントは、コントロールに関連付ける前にイメージを設定するのが普通です。ただし、イメージリストをコントロールに関連付けた後で、イメージを追加または削除することもできます。

メモ :
イメージを削除するときには、関連付けられているコントロールの ImageIndex プロパティがイメージの削除後も有効であることを確認してください。

プログラムによってイメージを追加するには

イメージリストの Images プロパティの Add メソッドを使用します。

次のコード例では、イメージの場所に対するパスとして My Documents フォルダが設定されています。この場所を使用するのは、Windows オペレーティングシステムを実行するコンピュータには、通常このディレクトリが存在すると考えられるためです。また、この場所を選択すると、最小限のシステムアクセスレベルのユーザーがアプリケーションをより安全に実行できます。次のコード例には、ImageList コントロールを追加済みのフォームが必要です。

Public Sub LoadImage()
   Dim myImage As System.Drawing.Image = _
     Image.FromFile _
   (System.Environment.GetFolderPath _
   (System.Environment.SpecialFolder.Personal) _
   & "\Image.gif")
   ImageList1.Images.Add(myImage)
End Sub

public void addImage()
{
// Be sure that you use an appropriate escape sequence (such as the 
// @) when specifying the location of the file.
   System.Drawing.Image myImage = 
     Image.FromFile
   (System.Environment.GetFolderPath
   (System.Environment.SpecialFolder.Personal)
   + @"\Image.gif");
   imageList1.Images.Add(myImage);
}

public:
   void addImage()
   {
   // Replace the bold image in the following sample 
   // with your own icon.
   // Be sure that you use an appropriate escape sequence (such as 
   // \\) when specifying the location of the file.
      System::Drawing::Image ^ myImage = 
         Image::FromFile(String::Concat(
         System::Environment::GetFolderPath(
         System::Environment::SpecialFolder::Personal),
         "\\Image.gif"));
      imageList1->Images->Add(myImage);
   }

キー値を指定してイメージを追加するには

キー値を引数に受け取る、イメージリストの Images プロパティのいずれかの Add メソッドを使用します。

次のコード例では、イメージの場所に対するパスとして My Documents フォルダが設定されています。この場所を使用するのは、Windows オペレーティングシステムを実行するコンピュータには、通常このディレクトリが存在すると考えられるためです。また、この場所を選択すると、最小限のシステムアクセスレベルのユーザーがアプリケーションをより安全に実行できます。次のコード例には、ImageList コントロールを追加済みのフォームが必要です。
```
Public Sub LoadImage()
   Dim myImage As System.Drawing.Image = _
     Image.FromFile _
   (System.Environment.GetFolderPath _
   (System.Environment.SpecialFolder.Personal) _
   & "\Image.gif")
   ImageList1.Images.Add("myPhoto", myImage)
End Sub
```

プログラムによってすべてのイメージを削除するには

Remove メソッドを使用して単一のイメージを削除します。

または

Clear メソッドを使用して、イメージリストのすべてのイメージを削除します。
```
' Removes the first image in the image list
ImageList1.Images.Remove(myImage)
' Clears all images in the image list
ImageList1.Images.Clear()
```