Inserire del testo in una Image ed in una Picture
Da Gambas-it.org - Wikipedia.
Versione del 18 gen 2012 alle 10:39 di 2.158.196.222 (Discussione)
Per inserire dei caratteri testuali in una Picture si potrà utilizzare "Paint" oppure "Draw":
' Gambas class file Public Sub Button1_Click() Dim p as Picture p = picture.load("fileImmagine.gif") ' carichiamo una immagine Paint.begin(p) Paint.Font.size = 10 Paint.DrawText("Testo qualsiasi", 10, 10, 100, 100, 3) Paint.End PictureBox1.Picture = p ' mostriamo il risultato in una PictureBox End
' Gambas class file Public Sub Button2_Click() Dim p as Picture p = picture.load("fileImmagine.gif") ' carichiamo una immagine Draw.begin(p) Draw.Font.size = 10 Draw.DrawText("Testo qualsiasi", 10, 10, 100, 100, 3) Draw.End PictureBox1.Picture = p ' mostriamo il risultato in una PictureBox End