Differenze tra le versioni di "Aprire un file mediante la Classe 'DesktopFile' con il programma al quale è associato"

Da Gambas-it.org - Wikipedia.
Riga 11: Riga 11:
 
   
 
   
 
  '''Public''' Sub Form_Open()
 
  '''Public''' Sub Form_Open()
−
+
    
−
   Dim dm As DesktopMime
 
 
   Dim df As DesktopFile[]
 
   Dim df As DesktopFile[]
 
   Dim b As Byte
 
   Dim b As Byte
−
+
 
−
+
  <FONT Color=gray>' ''Impostiamo il "MimeType" del file da aprire, ed otteniamo un vettore contenente i programmi al quale esso è associato:''</font>
−
  With dm = New DesktopMime
+
  df = DesktopFile.FromMime("text/html")
−
  <FONT Color=gray>' ''Impostiamo il file da aprire, ed otteniamo un vettore contenente i programmi al quale esso è associato:''</font>
+
 
−
    df = .FromFile("<FONT Color=gray>''/percorso/del/file/da/aprire''</font>").GetApplications()
 
−
  End With
 
−
 
 
  <FONT Color=gray>' ''Mostra nome e percorso delle applicazioni alle quali il file è associato:''</font>
 
  <FONT Color=gray>' ''Mostra nome e percorso delle applicazioni alle quali il file è associato:''</font>
−
  For b = 0 To df.Max
+
  For b = 0 To df.Max
−
    Print df[b].ProgramName, df[b].Path
+
    Print df[b].ProgramName, df[b].Path
−
  Next
+
  Next
−
+
 
−
  <FONT Color=gray>' ''Ad esempio apriamo il file con il primo programma al quale è associato,''
+
  <FONT Color=gray>' ''Ad esempio apriamo il file con il primo programma al quale è associato, e ne assegna il processo ad una variabile di tipo "Process":</font>
−
' ''e ne assegna il processo ad una variabile di tipo "Process":</font>
+
   pr = df[0].Run("<FONT Color=gray>''/percorso/del/file/da/aprire''</font>")
−
   pr = df[0].Run(df[0].Path)
 
 
   
 
   
 
  '''End'''
 
  '''End'''

Versione delle 12:52, 24 mar 2020

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

Per 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 df As DesktopFile[]
 Dim b As Byte
 
' Impostiamo il "MimeType" del file da aprire, ed otteniamo un vettore contenente i programmi al quale esso è associato:
 df = DesktopFile.FromMime("text/html")
 
' 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("/percorso/del/file/da/aprire")

End
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Aprire_un_file_mediante_la_Classe_%27DesktopFile%27_con_il_programma_al_quale_è_associato&oldid=25855"