Differenze tra le versioni di "Inserire un'immagine adattandola alle dimensioni della cella"

Da Gambas-it.org - Wikipedia.
(Nuova pagina: Mostreremo |1| un possibile algoritmo per inserire in una ''GridView'' un'immagine adattandola alla dimensione della cella. L'immagine dovrà essre caricata come ''image'', ...)
 
 
(9 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
−
Mostreremo |[[#Note|1]]| un possibile algoritmo per inserire in una ''GridView'' un'immagine adattandola alla dimensione della cella.
+
#REDIRECT[[Inserire_un'immagine_adattandola_alle_dimensioni_della_cella_di_una_GridView]]
−
 
 
−
L'immagine dovrà essre caricata come ''image'', per poter utilizzare il metodo ''.Stretch'' di questa classe.
 
−
 
 
−
'''Public''' Sub Form_Open()
 
−
 
−
  Dim p As Picture
 
−
  Dim i As New Image
 
−
 
−
  With GridView1
 
−
    .Columns.Count = 2
 
−
    .Rows.Count = 2
 
−
    .header = 1
 
−
    .Columns[0].Text = "\nprova\n"
 
−
    .Columns.W = 100
 
−
    .Rows[0].Height = 100
 
−
  End With
 
−
 
−
 
−
  With GridView1[0, 0]
 
−
<FONT color=#006400>' ''Carichiamo l'immagine adattandola alle dimensioni della cella:''</font>
 
−
    i = i.Load("''percorso_dell'immagine''")<FONT color=#B22222>.Stretch</font>(.W, .H)
 
−
<FONT color=#006400>' ''Viene quindi convertita in una "Picture"...''</font>
 
−
    p = i.Picture
 
−
<FONT color=#006400>' ''...per poter essere caricata nella cella:''</font>
 
−
    .Picture = p
 
−
  End With
 
−
 
−
'''End'''
 
−
 
 
−
 
 
−
 
 
−
----
 
−
==Note==
 
−
[1] Un ringraziamento all'utente "''clabe69''" del forum Gambas-it.org per i suoi suggerimenti.
 

Versione attuale delle 10:03, 14 ago 2019

Reindirizza a:

Estratto da "https://www.gambas-it.org/wiki/index.php?title=Inserire_un%27immagine_adattandola_alle_dimensioni_della_cella&oldid=25230"