Differenze tra le versioni di "Caricare un Oggetto ''Image'' direttamente in una ''ImageView'' con gb.cairo"

Versione delle 16:12, 29 set 2023

L'argomento di questa pagina è mostrare come sia possibile caricare un Oggetto Image direttamente in una ImageView con gb.cairo.
L'assegnazione dell'Oggetto Image alla Proprietà ".Image" della ImageView avverrà, dunque, senza creare un file immagine di appoggio da caricarsi successivamente.

Esponiamo un semplice codice. nel quale si caricherà un file immagine e le cui dimensioni verranno ridotte della metà. Quindi esso sarà mostrato all'interno della ImageView conservando in bianco la parte dell'immagine nelle sue dimensioni originarie.

Public Sub Form_Open()
 
 Dim im, im2 As Image
 
' Carica il file immagine da ridurre e successivamente da mostrare nella "ImageView":
 im = Image.Load("/percorso/del/file/immagine")
 
' Crea l'Oggetto "Image" nel quale sarà caricato il risultato del ridimensionamento dell'immagine prima caricata da file:
 im2 = New Image(im.W, im.H, Color.White, Image.Standard)
 
' Si imposta la "Image", sulla quale disegnare l'immagine ridimensionata, da passare poi alla "ImageView":
 Cairo.Begin(im2)
 
' Si effettua il ridimesionamento dell'immagine:
 Cairo.Scale(0.5, 0.5)
 
' Il ridimesionamento è effettuato sull'immagine caricata dal file:
 Cairo.Source = Cairo.ImagePattern(im, 0, 0)
 
' Si disegna l'immagine, puntata da "im" e ora ridimensionata, nell'Oggetto "Image" puntato da "im2":
 Cairo.Paint
 
' L'Oggetto "Image", rappresentato da "im2", quindi è passato alla proprietà ".Image" della "ImageView":
 ImageView1.Image = Cairo.Device
 
 Cairo.End
  
End