Differenze tra le versioni di "Inserire del testo in una Image ed in una Picture"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
− | Per inserire dei caratteri testuali in una ''Picture'' si potrà utilizzare "''Paint''": | + | Per inserire dei caratteri testuali in una ''Picture'' si potrà utilizzare "'''''Paint'''''" oppure "'''''Draw'''''": |
Riga 13: | Riga 13: | ||
Paint.begin(p) | Paint.begin(p) | ||
− | + | Paint.Font.size = 10 | |
− | + | Paint.DrawText("Testo qualsiasi", 10, 10, 100, 100, 3) | |
+ | |||
+ | Paint.End | ||
+ | |||
+ | PictureBox1.Picture = p ''<Font Color= #006400>' mostriamo il risultato in una PictureBox''</font> | ||
+ | |||
+ | '''End''' | ||
+ | |||
+ | |||
+ | '''Public''' Sub Button2_Click() | ||
+ | |||
+ | Dim p as Picture | ||
+ | |||
+ | p = picture.load("fileImmagine.gif") ''<Font Color= #006400>' carichiamo una immagine''</font> | ||
+ | |||
+ | Draw.begin(p) | ||
+ | |||
+ | Draw.Font.size = 10 | ||
+ | Draw.DrawText("Testo qualsiasi", 10, 10, 100, 100, 3) | ||
+ | |||
+ | Draw.End | ||
PictureBox1.Picture = p ''<Font Color= #006400>' mostriamo il risultato in una PictureBox''</font> | PictureBox1.Picture = p ''<Font Color= #006400>' mostriamo il risultato in una PictureBox''</font> | ||
'''End''' | '''End''' |
Versione delle 10:38, 18 gen 2012
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
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