Aprire un file mediante la Classe 'DesktopFile' con il programma al quale è associato

Da Gambas-it.org - Wikipedia.

La Classe "DesktopFile" ci consente di aprire un file utilizzando il programma, al quale esso è associato.

Pe ottenere questo risultato, sarà necessario utilizzare anche la Classe DesktopMime.

Per richiamare le Classi DesktopFile e DesktopMime si dovranno attivare i componenti gb.desktop e gb,desktop.x11 .


Vediamo un esempio pratico:

Private pr As Process


Public Sub Form_Open()

 Dim dm As DesktopMime
 Dim df As DesktopFile[]
 Dim b As Byte


  With dm = New DesktopMime
' Impostiamo il file da aprire, ed otteniamo un vettore contenente i programmi al quale esso è associato:
    df = .FromFile("/percorso/del/file/da/aprire").GetApplications()
  End With

' Mostra nome e percorso delle applicazioni alle quali il file è associato:
  For b = 0 To df.Max
    Print df[b].ProgramName, df[b].Path
  Next

' Ad esempio apriamo il file con il primo programma al quale è associato,
' e ne assegna il processo ad una variabile di tipo "Process":
  pr = df[0].Run(df[0].Path)

End