Accueil > Manip’s > Delphi > Richedit (RTF) > Insérér une image dans un Richedit
Insérér une image dans un Richedit
mercredi 13 juin 2012, par
Le composant natif de Delphi Richedit ne permet pas cette manip
Il faut faire appel au Jvrichedit de cette fabuleuse Librairie JEDY
NOTE
Pour installer correctement la dernière version de la JEDI, le vrai conseil de pro pour gagner du temps est :
- De désinstaller complètement DELPHI (j’ai bien dit désinstaller le programme Delphi) - On suppose bien sur que la sauvegarde des composants a été correctement faite)
- De nettoyer complètement le dossier BORLAND (suppression du disque)
- De passer le karcher sur le Registre (avec les Glaries Utilities par exemple)
- Puis de réinstaller de Novo DELPHI
- Puis la JVL
- Puis la JVCL (qui présente malheureusement des bugs à chaque fois)
- Il faut décocher le composant qui bogue
- Puis l’installer manuellement en corrigeant le bug soulevé dans le source (en général une banale faute de frappe que le programmeur a mis intentionnellement pour tester la perspicacité de l’utilisateur)
- On note en passant qu’il n’est pas utile d’installer TOUTE la libraire
- On installe la JCL
- Et ici le composant JvRichedit
Pour insérer une image dimensionnable dans un JvRichedit il faut :
- Un composant OpenPictureDialog
- Un Composant Image
- Un Composant JvRichedit
OpenPictureDialog
Va cherche l’image sur le disque
La commande classique est :
OpenPictureDialog.Execute ; |
Image
L’image est chargée sur le formulaire
Image1.Picture.LoadFromFile( OpenPictureDialog.Filename) ; |
Richedit
Puis placée au point d’insertion du curseur
RichEdit1.InsertGraphic(image1.Picture.Graphic, true) ; |
Avec true l’image est redimensionnable
La sauvegarde du Richedit AVEC son image intégrée et redimensionnée se fait par le non-moins classique :
RichEdit1.Lines.SaveToFile( ’MON_FICHIER.RTF’) ; |
EXEMPLE
Insertion d’un code barre dans une ordonnance.