Icon - Symbol von Dateityp ermitteln (Speicherort)

[-Lucky-]

Ich möchte in TListView das Symbol der entsprechenden Datei angezeigt haben. Damit das geht, muss ich wissen, wo ich das Icon (Symbol) auf der Festplatte finde. Wenn ich z.B. eine *.txt Datei habe, dann möchte ich das Symbol für die Textdatei laden. Dies soll für alle Dateitypen möglich sein. Ich habe schon versucht den Speicherort über die Registry heraus zu bekommen, das funktioniert aber nicht, hab alles durchsucht, nix gefunden

Dann bin ich auf die Idee gekommen Im Arbeitsplat bei Ordneroptionen -> Dateitypen zu gucken. Dort fand ich z.B. bei TXT Dateien heraus, dass das Symbol hier gespeichert ist: C:\WINDOWS\system32\shell32.dll Aber das wusste ich auch schon vorher.

Wenn man über Ordneroptionen das entsprechende Icon abfragen kann, dann muss man das doch auch irgendwie mit Delphi können. In meiner TListView soll halt das entsprechende Icon angezeigt werden.


Weiß das jemand zufällig, wie man das raus bekommt?