Differenze tra le versioni di "Caricare un Oggetto ''Image'' direttamente in una ''ImageView'' con gb.cairo"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "L'argomento di questa pagina è mostrare come sia possibile caricare un Oggetto ''Image'' <SPAN Style="text-decoration:underline">direttamente</span> in una ''ImageView'' con...") |
|||
| Riga 1: | Riga 1: | ||
L'argomento di questa pagina è mostrare come sia possibile caricare un Oggetto ''Image'' <SPAN Style="text-decoration:underline">direttamente</span> in una ''ImageView'' con gb.cairo. | L'argomento di questa pagina è mostrare come sia possibile caricare un Oggetto ''Image'' <SPAN Style="text-decoration:underline">direttamente</span> in una ''ImageView'' con gb.cairo. | ||
<BR>L'assegnazione dell'Oggetto ''Image'' alla proprietà "''.Image''" della ''ImageView'' avverrà, dunque, senza creare un file immagine di appoggio da caricarsi successivamente. | <BR>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. | 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 | Dim im, im2 As Image | ||
<FONT Color=gray>' ''Carica il file immagine da ridurre e successivamente da mostrare nella "ImageView":''</font> | <FONT Color=gray>' ''Carica il file immagine da ridurre e successivamente da mostrare nella "ImageView":''</font> | ||
| − | im = Image.Load("<FONT Color= | + | im = Image.Load("<FONT Color=darkgreen>''/percorso/del/file/immagine''</font>") |
<FONT Color=gray>' ''Crea l'Oggetto "Image" nel quale sarà caricato il risultato del ridimensionamento dell'immagine prima caricata da file:''</font> | <FONT Color=gray>' ''Crea l'Oggetto "Image" nel quale sarà caricato il risultato del ridimensionamento dell'immagine prima caricata da file:''</font> | ||
| Riga 31: | Riga 30: | ||
Cairo.End | Cairo.End | ||
| − | + | End | |
Versione delle 15:53, 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 e 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", ridimensionata nell'Oggetto "Image" puntata da "im2":
Cairo.Paint
' L'Oggetto "Image", rappresentato da "im2", quindi è passato alla proprietà ".Image" della "ImageView":
ImageView1.Image = Cairo.Device
Cairo.End
End
