Differenze tra le versioni di "Lanciare un programma esterno conoscendo soltanto il nome del suo file eseguibile presente nel sistema"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
Bisognerà attivare anche i Componenti "gb.desktop" e "gb.desktop.x11". | Bisognerà attivare anche i Componenti "gb.desktop" e "gb.desktop.x11". | ||
<BR>Si farà uso delle Classi ''DesktopFile'' e ''DesktopWindow''. | <BR>Si farà uso delle Classi ''DesktopFile'' e ''DesktopWindow''. | ||
− | Poniamo il caso in cui desideriamo lanciare il programma della "Calcolatrice" di "Gnome", del quale il nome del file eseguibile è "gnome-calculator" e il cui percorso è "/usr/bin/gnome-calculator" | + | Poniamo il caso in cui desideriamo lanciare il programma della "Calcolatrice" di "Gnome", del quale il nome del file eseguibile è "gnome-calculator" e il cui percorso è "''/usr/bin/gnome-calculator'' ". |
<BR>Dopo aver lanciato il programma della ''Calcolatrice'', provvederemo a centrare la sua finestra sulla Scrivania. | <BR>Dopo aver lanciato il programma della ''Calcolatrice'', provvederemo a centrare la sua finestra sulla Scrivania. | ||
Public Sub Button1_Click() | Public Sub Button1_Click() |
Versione delle 20:00, 11 ott 2023
Bisognerà attivare anche i Componenti "gb.desktop" e "gb.desktop.x11".
Si farà uso delle Classi DesktopFile e DesktopWindow.
Poniamo il caso in cui desideriamo lanciare il programma della "Calcolatrice" di "Gnome", del quale il nome del file eseguibile è "gnome-calculator" e il cui percorso è "/usr/bin/gnome-calculator ".
Dopo aver lanciato il programma della Calcolatrice, provvederemo a centrare la sua finestra sulla Scrivania.
Public Sub Button1_Click() Dim df As New DesktopFile(Null) Dim pr As Process Dim dw As DesktopWindow ' Lancia il programma della "Calcolatrice": pr = df.Run(System.Find("gnome-calculator")) ' Provvede a centrare la finestra della "Calcolatrice" sulla Scrivania: Repeat Wait 0.01 ' Attende che la finestra della "Calcolatrice" sia apparsa sulla Scrivania: Until Desktop.FindWindow(Null, Null, "gnome-calculator").Count > 0 dw = New DesktopWindow(Desktop.FindWindow(Null, Null, "gnome-calculator")[0]) ' Centra la finestra della "Calcolatrice" sulla Scrivania: dw.Move((Screen.W - dw.W) / 2, (Screen.H - dw.H) / 2) End