Inserer une image dans un richtextbox? [Résolu]

Signaler
Messages postés
39
Date d'inscription
dimanche 28 novembre 2004
Statut
Membre
Dernière intervention
4 juin 2007
-
Messages postés
39
Date d'inscription
dimanche 28 novembre 2004
Statut
Membre
Dernière intervention
4 juin 2007
-
Salut tout le monde,

Je souhaiterai inserer une image dans un richtextbox,j'ai fouillé partout mais sans succés!
Alors si quelqu'un sais comment faire : "bienvenue".

Merci de votre aide.

4 réponses

Messages postés
14738
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
23 novembre 2020
148
As tu tenter le copier avec l'objet clipboard et le sendkeys pour le coller?


Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)



NH
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 123 internautes nous ont dit merci ce mois-ci

Messages postés
39
Date d'inscription
dimanche 28 novembre 2004
Statut
Membre
Dernière intervention
4 juin 2007

Voilà j'ai finalement trouvé ....ouf ! Mon texte RTF comportera ainsi un petit texte que l'utilisateur va saisir (l16,Text11,.....) mais aussi une image qu'il va d'abord stocker dans Image1.picture....avant de l'inserer dans le texte RTF.....

Voici un extrait!!!!

"""""""""""""""""""""""""""""""""""""""""""""""""""""""""
l16 = "{\b " & Label15 & "\b0" & " " & Text11.Text & "\par\par }"
l17 = "{\b" & Frame2 & "\b0\par\par\par" & Text10 & "\par\par }"


RTB1.TextRTF = "{\i" & l1 & "\i0\par\par\par\par\par " & "\fs18" & l2 & l3 & l4 & l5 & l6 & l7 & l8 & l9 & l10 & l11 & l12 & l13 & l14 & l15 & l16 & l17 & "}"


Open "C:\Documents and Settings\fffffff\Bureau\Doc1.RTF" For Output As #1


Print #1, RTB1.TextRTF

' Copie l'image choisie dans le presse-papier
Clipboard.Clear
Clipboard.SetData Image1.Picture


' Colle l'image contenue dans le presse papier à l'intérieur du
' contrôle RichtextBox.
SendMessage RTB1.hwnd, WM_PASTE, 0, 0

Close #1


CommonDialog1.ShowSave
RTB1.SaveFile (CommonDialog1.FileName)
""""""""""""""""""""""""""""""""""""""""""""""""""""

Merci tout ceux qui m'ont aidé!!!
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 123 internautes nous ont dit merci ce mois-ci

Messages postés
39
Date d'inscription
dimanche 28 novembre 2004
Statut
Membre
Dernière intervention
4 juin 2007

Non j'ai pas essayé!Je connaissais d'ailleur même pas.En fait je suis débutant,
j'ai commencé à programmer en vb il y'a 2 mois.Donc je sais pas si tu pourras
me donner un exemple d'utilisation ou comment ces deux fonctions marches?
Merci
Messages postés
14738
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
23 novembre 2020
148
Clipboard est un objet agissant sur le presse papier de windows, c'est un objet global, pas besoin d'en instancier un.

Sendkeys, est une fonction permettant de simuler la frappe au clavier.



Sinon, sur VBFrance, y doit y avoir kkes exemples.


Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)



NH