Discussion :

[Yoanben]

Bonjour, étant encore au stade de l'apprentissage,
On m'a confié quand même un projet a développer !
Et dans ce projet, je dois ouvrir un document word éxistant et placer un certain texte à un emplacement donné sur le document !
Mon premier problème est :
Comment piloter word avec Lazarus ?
En me renseignant, j'ai entendu parler de OLE et de ComObj, mais je ne sais pas comment les utiliser !

Merci de bien vouloir prendre quelques minutes pour me répondre.

Cordialement,
Yoanben

[SergioMaster]

Donc uniquement Windows. Je te conseille de lire la FAQ Delphi en première approche.

[Yoanben]

Ouais j'ai déja vu sa, sauf que Lazarus ne propose pas le composant TWordApplication .

[SergioMaster]

non , je parlais pas de cela mais de la partie OLE . Si ce n'est pas dans cette partie , regardes dans la FAQ Delphi/openOffice , là je suis certain qu'ils parlent de OLE (je l'utilise) .
Sinon je crois également en avoir parler sur ce forum mais a propos de OpenOffice Calc

Nota : il me semble avoir déjà vu un papier ecrit par quelqu'un utilisant cette technique pour faire ses états en LAZARUS avec word , si je le retrouve ... en attendant il y a toujours ça

[Yoanben]

Ok, merci, je regarde.

[Yoanben]

Bonjour,
J'ai testé et sa marche sauf que j'ai un petit problème !
Lorsque j'utilise la fonction pour inserer du texte, sa marche bien, mais quand je lui dit d'inserer le texte contenu dans un composant (que l'utilisateur a entré), sa marhe pas, enfin si sa marche, mais sa écrit des carrés.
Je pense que sa doit être le type de variable qui ne dois pas être bon.

Voici le bout de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

vContent.InsertAfter(Edit3.Text);

Dans ce cas, quel est le type de chaine de caractère qu'il faut et surtout comment le convertir ?

Merci

[Yoanben]

C'est bon, j'ai réussi !
En faite j'ai fais un simple Var:=Edit1.Text;
Et var est de type variant.
Ainsi sa marche !

Sinon autre petite question, comment on fais pour imprimer ? Et selectionner la bonne imprimante !

[Yoanben]

Me revoila, sa marche !
J'ai fais ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

vWDocument.Application.Dialogs.Item(88).Show;

merci.