vb6 - VB6はImageListから画像（任意の種類）を抽出します

Question

ImageList から画像 (任意の種類) を抽出し、拡張子を付けてファイルとして保存します。

Answer 1

すでにExtractIconメソッドを使用してみましたか? IPictureDispこれにより、アイテムのアイコンを表すオブジェクトが返されListImageます。

次に、画像オブジェクトを抽出したら、SavePicture関数を呼び出すだけで、ディスク上のファイルに保存できます。

したがって、次のコードのようなものを使用できます。

Dim myPic As Picture
Set myPic = ImageList1.ListImages(1).ExtractIcon
SavePicture myPic, "C:\MyIcon.ico"  '(never hardcode a path in your actual code!)

Answer 2

これがあなたが望むものだと思います：http://btmtz.mvps.org/gfxfromfrx/

私はかなり便利だと思いました。