Differenze tra le versioni di "Rendere semitrasparente una immagine"

Da Gambas-it.org - Wikipedia.
 
(4 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
 
La ''semitrasparenza'' consente di vedere, oltre agli elementi costituenti un'immagine, anche un'altra immagine posta al di sotto di quella.
 
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''.
+
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.
−
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 i As New Image
+
  Dim im As Image
−
  Dim p As Picture
 
−
     
 
−
  PictureBox2.Picture = Picture.Load("''immagine_sottostante.xxx''") 
 
−
     
 
−
  With i = i.Load("''immagine_da_rendere_semitrasparente.xxx''") 
 
−
    i = .Opacity(0.5)
 
−
  End With 
 
−
     
 
−
  p = i.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>") 
−
La funzione ''.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 attuale delle 15:41, 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 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
      
  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.

Estratto da "https://www.gambas-it.org/wiki/index.php?title=Rendere_semitrasparente_una_immagine&oldid=37928"