SHGetFileInfo : Programmicon in Imagelist kopieren

[MathiasSimmack]

Zitat von Christian Seehase:

Wieso der erste Aufruf funktioniert hat ist mir allerdings ein Rätsel, denn mit

tmpImgLst.GetBitmap(FileInfo.iIcon,tmpBitmap); rufst Du ein Bild aus der Imagelist ab und kopierst es in die Bitmap. FileInfo.iIcon hat mit Deiner Imagelist aber nichts zu tun, sondern bezieht sich auf die Systemimagelist.

Ich denke, das passt schon, denn er hat das Handle der System-Imageliste ja vorher ermittelt:

Zitat:

Delphi-Quellcode:

tmpImgLst.Handle      := SHGetFileInfo(PChar(FName),0,
      FileInfo,sizeof(FileInfo),SHGFI_SYSICONINDEX or SHGFI_ICON);