Ciao Mario,
On Jun 14, 2007, at 1:46 AM, Mario Graziani wrote:
Salve a tutti, mi sono appena registrato.
Non ho compreso bene cosa significa consegna individuale o digest.
Scusate la mia ignoranza, qualcuno può spiegarmelo. grazie.
Ecco il problema.
Devo scrivere una stringa su un immagine poi salvarla
Con Rb 2007 r1 su Windows il codice che ho utilizzato è il seguente:
dim testo as string
dim p as picture
p = Canvas1.backdrop
testo="Prova"
p.Graphics.TextFont ="Times"
p.Graphics.ForeColor = &cFFFFFF
p.Graphics.TextSize = 24
p.graphics.drawString testo,x,y
Canvas1.refresh
segue codice salvataggio
Nella canvas1 ho inserito un immagine bitmap file.bmp come backdrop
e tutto funziona alla perfezione.
Lo stesso codice su un Mac con RB 2007 r2 non funziona, appena
viene chiamata questa sub esce senza avvisi di errore
e solo con il laconico avviso L'applicazione prog.debug si è chiusa
inaspettatamente.
Esce sia con un immagine bitmap sia con un file .pict come previsto
dal manuale
Ho provato il codice su REALbasic 2007 R3 e il debugger rileva
correttamente un problema riferendosi a p.Graphics.
Modificando il codice in questo modo, funziona:
dim testo as string
dim p as picture = NewPicture(Canvas1.Width, Canvas1.Height, 32)
p.Graphics.DrawPicture(Canvas1.backdrop,0,0)
testo="Prova"
p.Graphics.TextFont ="Times"
p.Graphics.ForeColor = &cFFFFFF
p.Graphics.TextSize = 24
p.Graphics.drawString(testo,20,20)
Canvas1.Backdrop = p
Inoltre qalcuno conosce un modo o un plugin che permette di aprire,
salvare un file.rtf da un editfield su mac.
Puoi utilizzare la classe StyledText, assegnando il contenuto del
file rtf alla proprietà RTFData.
--
gilberto de faveri
omnidea srl
edificio pegaso
parco scientifico tecnologico vega
via delle industrie, 15
30175 venezia marghera
tel +39 041 509 3441
fax +39 041 509 3641
www.omnidea.it
|