Delphi-PRAXiS - Delphi OrdnerIcons setzen

Hi zusammen

Wie ich Icons einer Datei oder eines Ordners auslese, hab ich

hier gefunden. Und wie das in Delphi so ist: zu einer Get-Methode gehört meist auch eine Set-Methode - aber so in Windows offensichtlich nicht. Und das stellt mich nun vor die Frage: Wie weise ich einem Ordner ein eigenes Icon zu?
Hintergrund ist: Im Moment erweitere ich meinen Pathfinderframe um die Fähigkeit, Order anlegen zu können. Dazu erzeuge ich im Treeview einen neuen TreeNode, weise diesem ein eigenes Icon zu, zeige ihn im Editmodus an und erzeuge (noch nicht) den zugehörigen Ordner im Parentvverzeichnis.
Das Problem dabei: Schliesse ich das Programm, sind die Nodes natürlich weg - und damit auch ihre zugewiesenen Node.Data - Infos. Also werden die Ordner bei einem erneuten Öffnen des Programms mit den Standard-Icons aus einer Imagelist geladen. Das Programm kann nun ja nicht mehr die Nodes.Data auslesen. Die müssen ja erst wieder neu erzeugt werden.

Klar, ich könnte eine Liste mit den Dateiname erstellen. Das Programm müsste dann "nur" den gefundenen Namen mit dieser Liste vergleichen - viel Spass, wenn ein Verzeichnis mehrere hundert Untereinträge aufweist...

Und da bietet sich nun shgetfileinfo an, um das einem Ordner zugeordnete Icon auszulesen. Aber wie weise ich so ein Icon zu?

Gruss
Delbor