Einzelnen Beitrag anzeigen

Benutzerbild von R2D2
R2D2

Registriert seit: 20. Jan 2006
Ort: München
253 Beiträge
 
Delphi 2005 Personal
 
#1

Icon einer Datei auslesen

  Alt 3. Mai 2006, 18:00
Momentan lese ich mit
Delphi-Quellcode:
ic: TIcon
...
ico.Handle := ExtractIcon(Application.Handle, PChar('C:\Test.exe'), 0);
Bilder.Addicon(ico);
Icons aus einer Datei aus. Das funktionniert alledings nur bei .exe-Dateien.

Gibt es eine Möglichkeit, dies auch bei Dateien zu tun (Besipielsweise .doc) um die Symbole wie im Explorer anzuzeigen?
if then then then = else else else = then;

Meine Webseite
  Mit Zitat antworten Zitat