Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.736 Beiträge
 
Delphi 6 Enterprise
 
#48

AW: VirtualStringTree - SHGetFileInfo hängt Programm auf / Canvas erlaubt kein Zeichn

  Alt 11. Dez 2020, 17:29
Lass uns das doch mal Schritt für Schritt planen:

Du hast eine ImageList, im Create erzeugt, erst mal leer
Du hast ein Dictionary wie oben beschrieben von aviator(#42), erst mal leer, im Create erzeugt

Dann im InitNode:
Prüfe für die Dateiendung, ob es schon einen Eintrag im Dictionary gibt:
-falls ja weise die dazu im Dictionary gespeicherte Zahl dem ImageIndex des Treenodes zu
-falls nein lade das Icon per SHGetFileInfo und pack es in die ImageList, packe den so entstehenden neuen ItemIndex (Zahl) des Icons in der ImageList zusammen mit der Dateiendung in das Dictionary und natürlich in dem ItemIndex des Treenodes

Jetzt musst du nur noch beim Zeichnen des Nodes im tree, das du ja selber machst (laut anderem Thread hier in der DP) gucken, dass das Icon aus der ImageList, von dem du ja den Index hast, gezeichnet wird.

Leider hab ich vom VST keine Ahnung, sondern das scheint mir anhand der 5 Seiten hier im thread, das zu sein was nötig ist. Wenn das quatsch ist veresst es einfach.
Ralph

Geändert von Jumpy (11. Dez 2020 um 17:31 Uhr)
  Mit Zitat antworten Zitat