[RISOLTO] Drawingarea: disegnare testo

[Taurus dei miracoli]

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:

Codice: [Seleziona]

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!!!

[Ceskho]

@chesko:
prima di aprire il post ho effettuato numerose ricerche...
...giuro!!!

Allora ti punisco per aver sbagliato il mio nick!!!! 

Il tuo problema è dovuto alla proprietà cached che deve essere impostata su TRUE o tramite l'IDE o mediante codice....

Codice: gambas [Seleziona]

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

[Taurus dei miracoli]

Allora ti punisco per aver sbagliato il mio nick!!!! 

Sto punito...
...e ti ringrazio.

[Ceskho]

Allora ti punisco per aver sbagliato il mio nick!!!! 

Sto punito...
...e ti ringrazio.

Impara dai tuoi errori blasfemo....

Figurati...

Se hai risolto sai cosa fare.....