Bonjour,
J'utilise un composant TWordApplication
Lors de l'exécution du code une message d'erreur me dit que mon programme a provoqué une classe d'exception EOleException avec le message 'La commande à échoué'
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 var DotFilename:OleVariant begin Wordapplication1.Connect; SaveChanges:=wdDoNotSaveChanges; DotFilename:='..\test.doc'; WordApplication1.Visible := true; WordApplication1.Documents.Open(DotFileName,EmptyParam,EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, Visible); end;
Merci pour votre aide
Partager