Differenze tra le versioni di "Modificare l'opacità di un'immagine"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per modificare l'opacità di una immagine, si può adottare la seguente modalità. <SUP>[[[#Note|nota 1]]]</sup> ===Usare il Metodo ".Opacity()" della Classe ''Ima...") |
|||
| Riga 14: | Riga 14: | ||
PictureBox1.Image = im<FONT Color=red>.Opacity</font>(0.5) | PictureBox1.Image = im<FONT Color=red>.Opacity</font>(0.5) | ||
| + | |||
| + | End | ||
| + | |||
| + | |||
| + | ===Usare la Proprietà ".Opacity" della Classe ''Paint''=== | ||
| + | La Proprietà ".Opacity" della Classe ''Paint'' accetta valori in virgola mobile compresi fra 0.00 e 1.0 . | ||
| + | <BR>Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato. | ||
| + | Esempio: | ||
| + | Public Sub Form_Open() | ||
| + | |||
| + | Dim im As Image | ||
| + | |||
| + | im = Image.Load("<FONT Color=darkgreen>''/percorso/del/file/immagine''</font>") | ||
| + | |||
| + | With '''Paint''' | ||
| + | .Begin(im) | ||
| + | <FONT Color=red>.Opacity</font> = 0.2 | ||
| + | .End | ||
| + | End With | ||
| + | |||
| + | PictureBox1.Image = im | ||
End | End | ||
Versione delle 11:00, 26 nov 2024
Per modificare l'opacità di una immagine, si può adottare la seguente modalità. [nota 1]
Usare il Metodo ".Opacity()" della Classe Image
Il Metodo ".Opacity()" della Classe Image accetta valori in virgola mobile compresi fra 0.00 e 1.0 .
Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato.
Esempio:
Public Sub Form_Open()
Dim im As Image
im = Image.Load("/percorso/del/file/immagine")
PictureBox1.Image = im.Opacity(0.5)
End
Usare la Proprietà ".Opacity" della Classe Paint
La Proprietà ".Opacity" della Classe Paint accetta valori in virgola mobile compresi fra 0.00 e 1.0 .
Se il valore di tipo Float è uguale a 0.00, allora l'immagine diventa completamente trasparente. Se invece è uguale a 1.0, allora il suo grado di opacità è immodificato.
Esempio:
Public Sub Form_Open()
Dim im As Image
im = Image.Load("/percorso/del/file/immagine")
With Paint
.Begin(im)
.Opacity = 0.2
.End
End With
PictureBox1.Image = im
End
Note
[1] Vedere anche questa pagina: Impostare l'opacità di un disegno in una DrawingArea
