ListView plik+ikona

0

Witam

Jak pobrać ikonę pliku. Dokładnie chodzi mo o coś takiego.
do listView1 wczytuję listę plików z danego katalogu. Jak zrobić żeby ikona tego pliku była wyświetlana razem z nazwą pliku. Czyli jak pisze dada.mp3 to koło niego pojawia się ikona pliku mp3 który aktualnie jest używany w systemie

0

www.delphiarea.com/products/ i poszukaj sys image list

a dla dokładności
http://www.delphiarea.com/products/sysimage/

0
TSHFileInfo FileInfo;
SHGetFileInfo(OpenDialog->FileName.c_str(), 0, &FileInfo, sizeof(FileInfo), SHGFI_SYSICONINDEX | SHGFI_SMALLICON | SHGFI_ICON);
ListItem->ImageIndex = FileInfo.iIcon;                        //dodanie odpowiedniej ikonki

1 użytkowników online, w tym zalogowanych: 0, gości: 1