Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Ole with word InlineShapes.AddPicture
Message
De
23/03/2004 15:58:51
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Ole with word InlineShapes.AddPicture
Divers
Thread ID:
00889027
Message ID:
00889027
Vues:
74
Hi

I am doing ole word and I insert an image in a textframe. After I insert the image the text frame is selected but not the image inside and the next command to change the bightness is not working. I am not able to select the image with ole code. If I can select the image the code will work.

He is the code:

FOR ia = 1 TO ow.activedocument.shapes.count
WITH ow.activedocument.shapes(ia)
IF .TextFrame.HasText <> 0
IF "sign:1:" $ .TextFrame.TextRange.Text
OW.ActiveDocument.Shapes(ia).TextFrame.TextRange.Select
.TextFrame.TextRange.Cut
ow.Selection.InlineShapes.AddPicture("D:\Systemes\Applic\Quest_Word\sign\01356.bmp", .f.,.t.)

* here I must select the image inside the textframe.

ow.Selection.InlineShapes(1).PictureFormat.Brightness = 0.6

ENDIF
ENDIF
ENDWITH
ENDFOR

Thanks

Michel
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform