Estrarre l'icona di un tipo di file
Da Gambas-it.org - Wikipedia.
Versione del 8 gen 2014 alle 19:33 di Vuott (Discussione | contributi) (Creata pagina con 'Quando un tipo di file è associato ad una determinata icona, tutti i file appartenenti a quel tipo saranno mostrati sul desktop con quell'icona. Per estrarre l'icona associa...')
Quando un tipo di file è associato ad una determinata icona, tutti i file appartenenti a quel tipo saranno mostrati sul desktop con quell'icona.
Per estrarre l'icona associata ad un tipo di file, si potrà utilizzare la Classe DesktopMime del componente gb.desktop
Nel semplice esempio seguente attiviamo il componente gb.desktop e poniamo sul Form dell'applicazione una PictureBox, nella quale sarà mostrata l'icona del tipo di file individuato:
Public Sub Button1_Click() Dim dm As New DesktopMime percorso = "/percorso/del/file" With dm = DesktopMime.FromFile(percorso) i = .GetIcon(48) PictureBox1.Picture = i.Picture End With End