Differenze tra le versioni di "Disegnare in una DrawingArea un rettangolo"
Da Gambas-it.org - Wikipedia.
| Riga 4: | Riga 4: | ||
Mostriamo un esempio: | Mostriamo un esempio: | ||
| − | + | Public Sub DrawingArea1_Draw() | |
<FONT Color=gray>' ''Traccia un percorso non visibile, come modello da disegno, per definire il rettangolo:''</font> | <FONT Color=gray>' ''Traccia un percorso non visibile, come modello da disegno, per definire il rettangolo:''</font> | ||
| Riga 19: | Riga 19: | ||
Paint.End() | Paint.End() | ||
| − | + | End | |
Ovviamente, per ottenere un quadrato, il terzo e il quarto argomento del Metodo ".Rectangle()" dovranno avere il medesimo valore. | Ovviamente, per ottenere un quadrato, il terzo e il quarto argomento del Metodo ".Rectangle()" dovranno avere il medesimo valore. | ||
Versione attuale delle 10:47, 27 giu 2024
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()" dovranno avere il medesimo valore.
