Rendere semitrasparente una immagine
Da Gambas-it.org - Wikipedia.
Versione del 29 gen 2016 alle 11:20 di Vuott (Discussione | contributi)
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.
Esempio.
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 p As Picture PictureBox2.Picture = Picture.Load("immagine_sottostante.xxx") With i = i.Load("/percorso/della/immagine") i = .Opacity(0.5) End With p = i.Picture PictureBox1.Picture = p End
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.