Differenze tra le versioni di "Conoscere le dimensioni di una immagine mediante il Componente gb.media"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per conoscere le dimensioni (Width, Height) in <U>pixel</u> di un'immagine mediante il Componente ''gb.media'', sarà possibile utilizzare la Classe ''MediaPlayer''. Mostriam...") |
|||
(3 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 1: | Riga 1: | ||
− | Per conoscere le dimensioni (Width, Height) in <U>pixel</u> di un'immagine mediante il Componente ''gb.media'', sarà possibile utilizzare | + | Per conoscere le dimensioni (Width, Height) in <U>pixel</u> di un'immagine mediante il Componente ''gb.media'', sarà possibile utilizzare almeno due modalità. |
+ | ==Usando la Classe ''MediaPlayer''== | ||
Mostriamo un semplice esempio pratico: | Mostriamo un semplice esempio pratico: | ||
Public Sub Main() | Public Sub Main() | ||
Riga 10: | Riga 11: | ||
mp.Play | mp.Play | ||
− | With mp.Video.Image | + | With mp<FONT Color=red>.Video.Image</font> |
Print "Dimensione dell'immagine: " & .W; "x"; .H & " pixel" | Print "Dimensione dell'immagine: " & .W; "x"; .H & " pixel" | ||
End With | End With | ||
Riga 17: | Riga 18: | ||
Quit | Quit | ||
+ | |||
+ | End | ||
+ | |||
+ | |||
+ | ==Usando le Classi ''MediaPipeline'' e ''MediaControl''== | ||
+ | Mostriamo un semplice esempio pratico adoperando il plugin ''gdkpixbufdec'' di GStreamer: | ||
+ | Public Sub Main() | ||
+ | |||
+ | Dim pl As New MediaPipeline | ||
+ | Dim src, gpb, con, xis As MediaControl | ||
+ | |||
+ | src = New MediaControl(pl, "filesrc") | ||
+ | src["location"] = "<FONT Color=darkgreen>''/percorso/del/file/immagine''</font>" | ||
+ | gpb = New MediaControl(pl, "gdkpixbufdec") | ||
+ | con = New MediaControl(pl, "videoconvert") | ||
+ | <FONT Color=gray>' ''Il plugin "fakesink" impedisce che sia mostrata, seppur per un attimo, l'immagine:''</font> | ||
+ | xis = New MediaControl(pl, "fakesink") | ||
+ | |||
+ | src.LinkTo(gpb) | ||
+ | gpb.LinkTo(con) | ||
+ | con.LinkTo(xis) | ||
+ | |||
+ | pl.Play() | ||
+ | |||
+ | With xis<FONT Color=red>.GetLastImage()</font> | ||
+ | Print "Dimensione dell'immagine: "; .W; "x"; .H; " pixel" | ||
+ | End With | ||
+ | |||
+ | pl.Close | ||
End | End |
Versione attuale delle 04:37, 1 lug 2024
Per conoscere le dimensioni (Width, Height) in pixel di un'immagine mediante il Componente gb.media, sarà possibile utilizzare almeno due modalità.
Usando la Classe MediaPlayer
Mostriamo un semplice esempio pratico:
Public Sub Main() Dim mp As New MediaPlayer mp.URL = Media.URL("/percorso/del/file/immagine") mp.Play With mp.Video.Image Print "Dimensione dell'immagine: " & .W; "x"; .H & " pixel" End With mp.Close Quit End
Usando le Classi MediaPipeline e MediaControl
Mostriamo un semplice esempio pratico adoperando il plugin gdkpixbufdec di GStreamer:
Public Sub Main() Dim pl As New MediaPipeline Dim src, gpb, con, xis As MediaControl src = New MediaControl(pl, "filesrc") src["location"] = "/percorso/del/file/immagine" gpb = New MediaControl(pl, "gdkpixbufdec") con = New MediaControl(pl, "videoconvert") ' Il plugin "fakesink" impedisce che sia mostrata, seppur per un attimo, l'immagine: xis = New MediaControl(pl, "fakesink") src.LinkTo(gpb) gpb.LinkTo(con) con.LinkTo(xis) pl.Play() With xis.GetLastImage() Print "Dimensione dell'immagine: "; .W; "x"; .H; " pixel" End With pl.Close End