Insérer une image dans Word

Messages postés
249
Date d'inscription
lundi 9 novembre 2009
Dernière intervention
6 mai 2018
-
Bonjour,
Je tente d'insérer une image dans un document Word.
(à la place du tag "###1")
L'image semble bien insérée mais n'est pas visible?!?
(Quand je clique dessus, le bord est bien présent)
var
  Fword,FDocument,Range:OleVariant;
  Filename:String;
  MyImage: TBitmap;
begin
MyImage:= TBitmap.Create;
Filename := FWord.ActiveDocument;
Range := FWord.ActiveDocument.Content;
Range.Find.Execute('###1');
if Range.Find.Found = True Then
begin
FWord.ActiveDocument.InlineShapes.AddPicture(extractFilePath(application.exename)+'pic1.jpg',True, True);
end;
end;

Merci pour vos idée...
PhilLu

EDIT : Ajout du LANGAGE dans les balises de code
Afficher la suite 

Votre réponse

1 réponse

Messages postés
4229
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
3 août 2018
0
Merci
Salut,

regarde cette recherche Google plusieurs pistes qui pourraient t'aider.

Ce qui m'a sauté aux yeux, c'est que le deuxième paramètre de "AddPicture" devrait être à false :
LinkToFile = false permet de ne pas dissocier l'image du texte.

a tester ... ;)
Commenter la réponse de Cirec

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.