Aiuto.
Mi trovo per la prima volta a utilizzare il controllo DrawingArea e vorrei utilizzarla per disegnare un testo.
Non riesco ad uscirne.
Questa è la prima prova che ho fatto:
PUBLIC SUB Form_Open()
Draw.Begin(DrawingArea1)
Draw.ForeColor = Color.Black
Draw.FillColor = Color.Black
Draw.BackColor = Color.White
Draw.Text("prova e riprova", 10, 10)
Draw.Rect(5, 185, 10, 40)
Draw.End()
END
Il risultato è il nulla...
...mi date 2 dritte.
@chesko:
prima di aprire il post ho effettuato numerose ricerche...
...giuro!!!
@chesko:
prima di aprire il post ho effettuato numerose ricerche...
...giuro!!!
Allora ti punisco per aver sbagliato il mio nick!!!! ;D
Il tuo problema è dovuto alla proprietà cached che deve essere impostata su TRUE o tramite l'IDE o mediante codice....
PUBLIC SUB Form_Open()
'-- AGGIUNGI QUESTA
DrawingArea1.Cached = TRUE
Draw.Begin(DrawingArea1)
Draw.ForeColor = Color.Black
Draw.FillColor = Color.Black
Draw.BackColor = Color.White
Draw.Text("prova e riprova", 10, 10)
Draw.Rect(5, 185, 10, 40)
Draw.End()
END