Wie kann ich ein Icon aus der Registry auslesen?

[emsländer]

Ich möchte für ein eigenes FTP-Filefoldersystem die lokalen Dateiassoziationen aus der Registry oder sonstwo auslesen können. Ich benötige die Symbole, da ich die dann dementsprechend in meinem System darstellen möchte. Hat das schon mal jemand gemacht?


Gruss

EL

[OregonGhost]

Das müsste eigentlich mit ExtractAssociatedIcon gehen.

[mkinzler]

Steht unter HEY_CLASSES_ROOT.
Wobei bei der Endung nur der dateityp steht, bei dem unter DefaulIcon dann ein Verweis auf das Icon steht.
[Edit: Meine Lösunf bringt dir die mit der Endung verknüpfte Icons, OregonGhost die sich in der Ressource einer Exe befindlichen.]

[emsländer]

Zitat:

Zitat von OregonGhost

Das müsste eigentlich mit ExtractAssociatedIcon gehen.

Hi

das blick ich jetzt sooo nicht :oops:

Wie kann ich das Icon denn "einlesen" ?

Gruss

EL

[SirThornberry]

@mkinzler: Die Funktion "ExtractAssociatedIcon" liefert das Icon welches zur Darstellung im Explorer verwendet und nicht nur das von Exe-Dateien.

[mkinzler]

Okay, dann ist das natürliche die bessere Methode.

[SirThornberry]

eine weitere Möglichkeit wäre über vielleicht noch die Icons über SHGetFileInfo zu bekommen (in Zusammenhang mit einer Imagelist)
[Edit]
SHGetFileInfo geht doch nicht. Dazu wäre es nötig das die Datei tatsächlich existiert (also nicht nur die Dateiendung)
[/Edit]

[OregonGhost]

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 :P]Da du die Symbole wohl auch für lokal nicht-existente Dateien brauchst, kommt SHGetFileInfo SirThornberry folgend wohl doch nicht in Frage ;) [/Edit]

[SirThornberry]

Die Methode mit ExtractAssocitedIcon funktioniert übrigens auch nur mit Dateien die tatsächlich existieren (gerade getestet)

[OregonGhost]

Hmm, damit wären wir dann wohl doch bei mkinzlers Methode :mrgreen: