Disegnare in una DrawingArea un rettangolo

Da Gambas-it.org - Wikipedia.
Versione del 19 ott 2020 alle 08:42 di Vuott (Discussione | contributi) (Creata pagina con "Per disegnare in una ''DrawingArea'' un rettangolo, o un quadrato, è necessario utilizzare il Metodo ".Rectangle()" della Classe ''Paint''. Bisogna innanzitutto costruire un...")

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

Per disegnare in una DrawingArea un rettangolo, o un quadrato, è necessario utilizzare il Metodo ".Rectangle()" della Classe Paint.

Bisogna innanzitutto costruire un modello di disegno aggiungendo "percorsi" rappresentati da coordinate e dimensioni del rettangolo da disegnare, e quindi usare il Metodo ".Stroke()", per simulare una semplice pennellata, oppure usare il Metodo ".Fill()" per riempire il rettangolo con un colore.

Mostriamo un esempio:

Public Sub DrawingArea1_Draw()
 
' Traccia un percorso non visibile, come modello da disegno, per definire il rettangolo:
 Paint.Rectangle(10, 20, 50, 100)
 
' Traccia di blu i lati del rettangolo e non distrugge il percorso, affinché possa essere utilizzato anche nelle righe appresso:
 Paint.Brush = Paint.Color(Color.Blue)
 Paint.Stroke(True)
 
' Riempie l'area del rettangolo con il colore giallo e distrugge il percorso:
 Paint.Brush = Paint.Color(Color.Yellow)
 Paint.Fill()
 
 Paint.End()
 
End

Ovviamente, per ottenere un quadrato il terzo e il quarto argomento del Metodo ".Rectangle" avranno il medesimo valore.