Differenze tra le versioni di "Rendere semitrasparente una immagine"

Da Gambas-it.org - Wikipedia.
 
Riga 9: Riga 9:
 
   Dim im As Image
 
   Dim im As Image
 
   
 
   
   With im = im.Load("<FONT Color=darkgreen>''/percorso/della/immagine''</font>")   
+
   im = Image.Load("<FONT Color=darkgreen>''/percorso/della/immagine''</font>")   
    im = <FONT Color=red>.Opacity(0.5)</font>
 
  End With
 
 
   
 
   
   PictureBox1.Image = im
+
   PictureBox1.Image = im<FONT Color=red>.Opacity(0.5)</font>
 
   
 
   
 
   PictureBox2.Image = Image.Load("<FONT Color=darkgreen>''/percorso/della/immagine/sottostante''</font>")   
 
   PictureBox2.Image = Image.Load("<FONT Color=darkgreen>''/percorso/della/immagine/sottostante''</font>")   

Versione attuale delle 17:50, 23 nov 2024

La semitrasparenza consente di vedere, oltre agli elementi costituenti un'immagine, anche un'altra immagine posta al di sotto di quella.

Per rendere semitrasparente un'immagine, è necessario utilizzare il Metodo ".Opacity()" della Classe Image.

Nell'esempio, che segue, abbiamo due immagini poste in due PictureBox, una posta sotto l'altra.
L'obiettivo è di rendere semi-trasparente l'immagine superiore, in modo tale che si riesca a vedere anche l'immagine sottostante:

Public Sub Form_Open()

  Dim im As Image

  im = Image.Load("/percorso/della/immagine")  

  PictureBox1.Image = im.Opacity(0.5)

  PictureBox2.Image = Image.Load("/percorso/della/immagine/sottostante")  

End

Il Metodo ".Opacity()" vuole un valore di tipo Float compreso tra 0.0 ed 1.0 .
Se il valore di tipo Float è uguale a 0.0, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato.