Office: (Office 2003) AnwendungsIcon von Datei auslesen und als Picture anzeigen

Habe folgende Problemstellung:

Enlosformular mit Dateinamen, Pfade uvm. und ich möchte nun das AnwendungsIcon der angegebenen Datei als Bild anzeigen.

Meine Fragen nun:
-Wie ermittle ich das Icon?
-Wie kann ich es direkt einbinden/anzeigen?
-Andere Idee?

Da Endlosformular fallen Ole und ActivX-Elemente als Hilfen aus!

:)

 

Hallo,

die elegante Lösung würde mich auch interessieren, aus Zeitgründen habe ich mich nicht damit beschäftigt.

Meine quick and dirty Lösung sieht etwa so aus, dass ich eine Tabelle Icons habe

Felder :
Dateiendung > Text
IconOLE > OLE dort werden Bitmap-Dateien gespeichert.
Ich kopiere diese direkt aus dem geöffnet Windows-Paint in die OLE-Felder.
Dann werden die Bitmaps auch als Paint-Objekt hinterlegt.

Die Bitmap-Dateien können in Endlosformularen problemlos als gebundene OLE-Objekte angezeigt werden.
In der Datenquelle des Formulars wird aus dem Dateiname die Dateiendung ermittelt und entsprechend mit der Icon-Tabelle verknüpft.

Für die wichtigsten Dateiformate funktioniert diese Methode ganz gut. Kommt eine neue Datei-Endung für die es kein Eintrag in der Icons-Tabelle gibt, dann wird natürlich auch kein Icon angezeigt.

 

\@Horst: Die elegante Lösung wäre, Ac07 zu verwenden. *biggrin.gif* (SCNR)

 

Hallo,

wieso gibt es dort einen einfachen Weg um für all mögliche Dateierweiterungen Icons anzuzeigen. Das entscheidene ist doch erstmal von Windows abzufragen, welches Icon für welche Dateiendung zu verwenden ist.

Oder meinst Du die Funktion LoadPicture? Für Access 2010 nutzen wir für Ribbons die LoadPicturePlus Funktion von Sascha.

Access 2007 habe allerdings abgehakt, stattdessen konzentriere ich mich auf Access 2010. Schon die Beta macht einen wesentlich besseren Eindruck als Access 2007.

 

Wenn das das Entscheidene ist, dann hilft Ac2007 oder Ac2010 auch nicht. Ich bezog mich auf die Fähigkeit, dass man das Bildsteuerelement an ein Feld mit dem Dateipfad binden kann.

 

Die Quick and Dirty Variante macht hier kein Sinn, da alle möglichen "Anhänge" an Berichte dran sollen (gesammelte Werke, welche zu dem Bericht geführt haben...) - und je nachdem, was auf den einzelnen PC´s an Software vorhanden ist auch die "IconSammlung" dementsprechend schwer zu verwalten wäre!

Da ich die Datei und alle Infos dazu wohl abrufen kann, wäre es sinnvoll das Icon zu ermitteln und anschließend in der DB (wie?) anzeigen / bzw. extrahieren und in der DB zur weiteren Verwendung zu speichern!

Ac2007 fällt in diesem Falle erst mal flach - auf den Systemen nicht zugelassen!

 

Hallo,

ich habe mal gegoogelt und folgendes gefunden:

vb@rchiv · Tipps & Tricks · Icon einer Anwendung einer ImageList hinzufügen

Dort wird allerdings mit einer Imagelist gearbeitet. Wenn man nun statt mit einem Entlosformular, die Dateien mit einem Triewview-Control anzeigt, sollte es klappen. Das ganze wäre allerdings, alles andere als quick and dirty *wink.gif*

 

Hallo nochmal,

eine Frage, die zumindest für mich bleibt ist, wie ermittel ich die Windowsanwendung für eine Datei-Erweiterung?

z.B.
".doc" > "C:\Program Files\Microsoft Office\Office12\winword.exe"

Denn aus der Exe-Datei kann das Icon als Picture separiert werden.

 

Dafür könntest du die WinAPI FindExecutableA verwenden.

Code:

Verwendung:
Code:

Anm.: eventuell gibt es aber auch eine API-Funktion, die je Erweiterung direkt das Icon liefert.

 

Hallo Josef,

gute Antwort, funktioniert wie verrückt.
Obwohl wir diese Funktion schon an anderer Stelle einsetzen, bin ich in diesen Zusammenhang nicht darauf gekommen. Aber so ist es ja täglich, man sucht lange nach einer Lösung und ist dann verblüfft wie einfach es ist.*Smilie

 

Ist mir noch nie untergekommen.

Ciao, Sascha

 

Hallo,

zur Anzeige des mit einer Datei assoziierten Icons verwende ich die hier beschriebene Funktion (SHGetFileInfo-Funktion in der unteren Hälfte des Artikels). Und bisher funktioniert das einwandfrei. *wink.gif*

 

Hallo
ich habe jetz auch noch eine Frage
wenn jetzt das habe
C:\Programme\Adobe\Reader 9.0\Reader\AcroRd32.exe
wie bekom ich jetzt das icon ?

war anscheinend zu schnell mit meiner Frage Sorry *Smilie

 

\@Ruedi: Wer lesen kann, ist klar im Vorteil! Lies Dir doch einfach den Link aus #12 durch...

 

Hallo
@Fw
Wer lesen kann, ist klar im Vorteil! Lies Dir doch einfach den Link aus #12 durch...
das solltes Du Dir Merken ich habe getipt als #12 noch nich existiert hat *tongue.gif* *Genervt