Conoscere le dimensioni di una immagine mediante il Componente gb.media
Da Gambas-it.org - Wikipedia.
Versione del 1 lug 2024 alle 04:37 di Vuott (Discussione | contributi)
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