cs_julian
Messages postés21Date d'inscriptionlundi 17 décembre 2001StatutMembreDernière intervention 6 juin 2002
-
8 janv. 2002 à 14:41
Louhichi007
Messages postés7Date d'inscriptionmercredi 24 décembre 2008StatutMembreDernière intervention 4 avril 2009
-
8 janv. 2009 à 17:24
Est-il possible d'écrire du texte dans un controle rich text box à la fin ou apres le texte qui est déja dans le controle.
il faudrait un truc comme EOF (pour les fichiers) mais pour le controle rich text box.
MERCI si vous avez la reponse !!!!!!!!!!!!
cs_julian
Messages postés21Date d'inscriptionlundi 17 décembre 2001StatutMembreDernière intervention 6 juin 2002 8 janv. 2002 à 15:26
-------------------------------
Réponse au message :
-------------------------------
le pb cé ke le texte ke je recupere il y a qq mots en gras.
Donc je devrai ecrire: rtb = rtb.textRTF & "new text"; mais je ne peux pas assembler du textRTF et du new text tout court.
Est ce ke tu comprend ?
cé pas tres facil et ça me prend la tête.
Louhichi007
Messages postés7Date d'inscriptionmercredi 24 décembre 2008StatutMembreDernière intervention 4 avril 2009 8 janv. 2009 à 17:24
Oui c'est possible mon ami ;
tu veux ajouter un texte aprés le texte préced
Exemple: Text1 as richTextBox
Cmd02 as commonDialog
FFichier ,TxtData as string
CmdInsert as commandButtan
dans l'événement click de CMDINSRET
cmd02.cancelerror=true
On error goto EX00
EX00:exit sub
cmd02.filter="Fichier texte(*.txt) |*.txt|fichier rtf(*.rtf)|*.rtf|"
cmd02.showopen
FFichier=cmd02.filename
open FFichier for input as #1
do while not EOF(1)
input#,txtData
loop
text1.seltext=txtData
Close#1