Mostrare in un Form un'immagine SVG: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
Nessun oggetto della modifica |
Nessun oggetto della modifica |
||
| Riga 2: | Riga 2: | ||
===Uso della ''DrawngArea''=== | ===Uso della ''DrawngArea''=== | ||
Si può far uso di | Si può far uso di una ''DreawingArea''. | ||
<BR>Il disegno dell'immagine SVG avverrà all'interno dell' | <BR>Il file immgine di formato SVG sarà caricato con la Classe ''SvgImage''. | ||
<BR>Il disegno dell'immagine SVG avverrà all'interno dell'Evento "_Draw()" dell'Oggetto ''DreawingArea'' mediante l'uso del Metodo ".Paint()" della Classe ''SvgImage'', il quale disegnerà l'immagine nel dispositivo corrente, ossia nella ''DreawingArea''. | |||
Private DrawingArea1 As DrawingArea | Private DrawingArea1 As DrawingArea | ||
Private svg As SvgImage | Private svg As SvgImage | ||
Versione attuale delle 01:05, 16 ott 2024
Per caricare e mostrare in un Form un'immagine di formato SVG, vi sono almeno tre modalità.
Uso della DrawngArea
Si può far uso di una DreawingArea.
Il file immgine di formato SVG sarà caricato con la Classe SvgImage.
Il disegno dell'immagine SVG avverrà all'interno dell'Evento "_Draw()" dell'Oggetto DreawingArea mediante l'uso del Metodo ".Paint()" della Classe SvgImage, il quale disegnerà l'immagine nel dispositivo corrente, ossia nella DreawingArea.
Private DrawingArea1 As DrawingArea
Private svg As SvgImage
Public Sub Form_Open()
svg = SvgImage.Load("/percorso/del/file.svg")
With DrawingArea1 = New DrawingArea(Me) As "DrawingArea1"
.X = 100
.Y = 100
.W = svg.W
.H = svg.H
End With
End
Public Sub DrawingArea1_Draw()
svg.Paint
End
Uso della PictureBox
E' però possibile anche utilizzare la modalità classica per caricare e mostrare le immagini, ossia con la Classe Image e l'Oggetto PictureBox:
Public Sub Form_Open()
Dim pb As PictureBox
Dim svg As Image
svg = Image.Load("/percorso/del/file.svg")
With pb = New PictureBox(Me)
.X = 100
.Y = 100
.W = svg.W
.H = svg.H
End With
End
Uso della ImageView
Public Sub Form_Open()
Dim ImageView1 As ImageView
With ImageView1 = New ImageView(Me)
.X = 100
.Y = 100
.Image = Image.Load("/percorso/del/file.svg")
.W = .Image.W
.H = .Image.H
End With
End