Differenze tra le versioni di "Rendere semitrasparente una immagine"

Da Gambas-it.org - Wikipedia.
Riga 3: Riga 3:
 
Per rendere ''semitrasparente'' un'immagine, è necessario utilizzare la funzione ''.Opacity'' della Classe ''Image''.
 
Per rendere ''semitrasparente'' un'immagine, è necessario utilizzare la funzione ''.Opacity'' della Classe ''Image''.
  
 
+
Nell'esempio, che segue, abbiamo due immagini poste in due ''PictureBox'', una posta sotto l'altra.
Esempio.
+
<BR>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()
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
+
  Dim im As Image
  Dim p As Picture
 
     
 
  PictureBox2.Picture = Picture.Load("<FONT Color=gray>''/percorso/della/immagine/sottostante''</font>") 
 
     
 
  With im = im.Load("<FONT Color=gray>''/percorso/della/immagine''</font>") 
 
    im = <FONT Color=#B22222>.Opacity(0.5)</font>
 
  End With 
 
     
 
  p = im.Picture 
 
 
        
 
        
   PictureBox1.Picture = p  
+
   PictureBox2.Picture = Picture.Load("<FONT Color=darkgreen>''/percorso/della/immagine/sottostante''</font>")  
 
        
 
        
'''End'''
+
  With im = im.Load("<FONT Color=darkgreen>''/percorso/della/immagine''</font>") 
Il metodo ''.Opacity( )'' vuole un valore di tipo Float compreso tra 0 ed 1. Se il valore di tipo Float è uguale a 0, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1, allora il suo grado di opacità è immodificato.
+
    im = <FONT Color=red>.Opacity(0.5)</font>
 +
  End With
 +
 +
  PictureBox1.Image = im
 +
 +
End
 +
Il Metodo ".Opacity()" vuole un valore di tipo Float compreso tra 0 ed 1. Se il valore di tipo Float è uguale a 0, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1, allora il suo grado di opacità è immodificato.

Versione delle 15:40, 3 lug 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 la funzione .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
      
  PictureBox2.Picture = Picture.Load("/percorso/della/immagine/sottostante")  
     
  With im = im.Load("/percorso/della/immagine")  
    im = .Opacity(0.5)
  End With

  PictureBox1.Image = im

End

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