Zitat:
Wie kann ich das Icon denn "einlesen" ?
Ungefähr so:
Delphi-Quellcode:
uses
ShellAPI;
var
wIndex: Word;
iconHandle: THandle;
...
iconHandle = ExtractAssociatedIcon(hInstance, 'DerPfadZuDeinerDatei', wIndex);
Dann kannst du mit dem iconHandle machen, was du willst (hab gerade keine Delphidokumentation zur Hand, aber daraus lässt sich sicherlich einfach ein TIcon machen). Ach so, nicht vergessen, das Icon irgendwann mit DestroyIcon wieder freizugeben
SirThornberrys Vorschlag mit SHGetFileInfo ist sicherlich auch einen Blick wert, da hatte ich gar nicht dran gedacht.
[Auch Edit
]Da du die Symbole wohl auch für lokal nicht-existente Dateien brauchst, kommt SHGetFileInfo SirThornberry folgend wohl doch nicht in Frage
[/Edit]