Newsgroup: it.comp.lang.visual-basic
Titolo: RichTextBox & grafica

Compitino per il dopo vacanze :-))
vb6 senza nessun SP (fino a quando posso!!!)
Carico in una RichTextBox un file .rtf con la funzione piu' sotto.
Carica tutto, anche le immagini, ma NON vuol sentir parlare di grafica:
quadrati, cerchi,linee ecc. fatti con la barra degli strumenti di disegno di
Word.
Non da nessun errore, carica tutto meno la grafica.
" l'ha dda fa' " o sono io un coglione?
ho provato a cambiare la costante vbUnicode di StrConv ma peggio che andar
di notte.....
Function loadrtf()
   fi = FreeFile()
   Open "MioFile.rtf" For Input As #fi
         RichTextBox1.TextRTF = StrConv(InputB$(LOF(fi), 1), vbUnicode)
   Close #fi
End Function
----- fine del compitino ----
A proposito che ne pensate di questo metodo per stampare?
Carico e rendo visibile nella RichTextBox un documento .rtf già impostato
nel documento ci sono dei segnalini del tipo $1....$2.... ecc.
il programma sostituisce ogni segnalino con il valore della variabile ad
esso associata.
poi si puo' stampare.
Con questo sistema ho dei vantaggi secondo me non trascurabili:
L'utente ha disponibile un'anteprima di stampa,
puo' scrivere cio' che vuole e mettere i segnalini dove vuole,
puo', anche prima di stampare, editare il documento, cambiare colori, font
ecc. e salvarlo come un nuovo documento.
L'utente puo' preformare vari file.rtf e caricare quello piu' opportuno.
Ho dovuto adottare questo sistema per un cliente che esigeva la possibilità
di poter cambiare a piacimento i documenti da stampare, ed ora lo uso anche
per stampare fatture ecc. perche' e' adattabile, dall'utente stesso, alle
proprie esigenze.
Ciao Paolo
-- 
Posted from 
mail-7.tiscalinet.it
 [195.130.225.153] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000501c12cc3$f9d957e0$32c7fea9@gianpa...


 esso associata.
L'avevo fatto anch'io.
Solo che oltre ai segnaposto avevo inserito anche dei comandi (non era su
RTF, ma direttamente sulla printer) tipo data di sistema, linee, cerchi,
cambio font, cambio margini, loop su dettagli di un recordset, ecc...
Funzionava...
Tanto meglio se hai già il laiout in RTF e vuoi dare al cliente la
possibilità di personallizzare il report.
Ciao

> L'RTB di VB è un bidone!
oddio... perche dici così ??
arricchito con i sendmessage e i vari messaggi a me sembra abbastanza
valido...
dov'è, secondo te, che si trovano le lacune? lo chiedo perche sto facendo da
poche settimane il primo programma in cui uso il RTB... e se c'è qualcosa di
realmente migliore magari mi conviene abbandonare il RTB e passare a un OCX
di terzi...
in poche parole, secondo te (e tutti quelli che leggono), quali sono i
principali limiti del RTB del VB ?
grazie
MarioH

 dov'è, secondo te, che si trovano le lacune?
prova ad esempio a voler settare il tabstop a 4 caratteri (come l'IDE di
VB).
Con la textbox si fa in un attimo con EM_SETTABSTOPS.
Con l'RTB non c'è stato verso.
E questo è solo uno dei messaggi.
Inoltre ha problemi antiestetici di rinfresco quando cambio selezione e
proprietà del testo selezionato.
Per esempio.
E i messaggi EM_* che trovi su MSDN non sai mai se non funzionano perchè
sbagli qualcosa o perchè l'RTB non li supporta (ricorda che _non_ è l'RTB
2.0 a cui fa riferimento MSDN).
Comunque se quello che devi fare è solo un piccolo editor RTF potrebbe anche
andar bene (ah, da codice come accidenti fai ad inserire un'immagine?)
Ciao

 2.0 a cui fa riferimento MSDN).
e io ne so qualcosa... ho perso un secolo con em_posfromchar....
magari più in la passerò a qualceh altro ocx... chissa...
ciao
MarioH