Differenze tra le versioni di "Ottenere la schermata (screenshot) della finestra di un programma"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per ottenere la schermata (screenshot) della finestra di un programma Gambas o di un programma esterno, si potranno utilizzare alcune risorse della Classe ''Desktop'' attivand...") |
|||
| Riga 7: | Riga 7: | ||
Dim pc As Picture | Dim pc As Picture | ||
| − | pc = Desktop.Windows.FromHandle(Me.Handle).GetScreenshot( | + | pc = Desktop.Windows.FromHandle(Me.Handle).GetScreenshot(True) |
pc.Save("/tmp/immagine.png", 100) | pc.Save("/tmp/immagine.png", 100) | ||
| Riga 23: | Riga 23: | ||
i = Desktop.FindWindow("*Calculator*", Null, Null)[0] | i = Desktop.FindWindow("*Calculator*", Null, Null)[0] | ||
| − | pc = Desktop.Windows.FromHandle(i).GetScreenshot( | + | pc = Desktop.Windows.FromHandle(i).GetScreenshot(True) |
pc.Save("/tmp/immagine.png", 100) | pc.Save("/tmp/immagine.png", 100) | ||
'''End''' | '''End''' | ||
Versione delle 02:13, 8 apr 2016
Per ottenere la schermata (screenshot) della finestra di un programma Gambas o di un programma esterno, si potranno utilizzare alcune risorse della Classe Desktop attivando i Componenti gb.desktop e gb.desktop.x11 .
Mostriamo un esempio, nel quale verrà effettuata un'istantanea schermata della finestra di un programma Gambas, dalla quale si otterrà un file immagine:
Public Sub Button1_Click()
Dim pc As Picture
pc = Desktop.Windows.FromHandle(Me.Handle).GetScreenshot(True)
pc.Save("/tmp/immagine.png", 100)
End
In quest'altro caso, tenendo attiva la finestra di un programma, se ne otterrà una schermata e quindi un relativo file immagine.
Poniamo il caso di avere attiva la finestra della calcolatrice (il nome della sua finestra è Calculator):
Public Sub Button1_Click()
Dim i As Integer
Dim pc As Picture
i = Desktop.FindWindow("*Calculator*", Null, Null)[0]
pc = Desktop.Windows.FromHandle(i).GetScreenshot(True)
pc.Save("/tmp/immagine.png", 100)
End
