RE: RE: [prog] Positionnement curseur dans entete ou pied de page

[Cezame Concept]

Title: Positionnement curseur dans entete ou pied de page

Merci je ne pensais pas que ce soit aussi simple …   J’attends avec impatience le manuel de programmation que mon patron a fini par commander !!!   Merci     De : [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Envoyé : jeudi 13 avril 2006 10:59 À : prog@fr.openoffice.org Objet : [Norton AntiSpam] RE: [prog] Positionnement curseur dans entete ou pied de page   D'après ce que je lis, la réponse est dans ton code : à partir du style de page, il te suffit de récupérer soit : .HeaderText soit .FooterText puis tu crées un curseur sur ces textes (comme tu le fais déjà dans tes 2 routines). Sinon, comme tu récupères déjà ces infos dans tes routines, tu peux les mettre dans des variables globales pour qu'elles soient accessibles de partout (peu conseillé en général), ou utiliser des fonctions qui retournent ces infos (plus propre). Je programme en C++, donc je ne peux que te donner des pistes, ne connaissant pas très bien le Basic.   Il faut utiliser les mécanismes de base de la programmation Basic (en résumé). Si tu ne connais pas ces mécanismes, tu risques d'avoir beaucoup de mal et de passer ton temps à poser des questions sur ce forum. Une formation en Basic ou la lecture de l'aide en ligne concernant le Basic te serait peut-être d'une grande aide, pour avancer plus vite. La lecture d'exemples en Basic sur le oooforum (code snippets) t'aiderait aussi sans doute (mais il faut comprendre l'angalis).   Cordialement, Emmanuel -----Message d'origine----- De : Cezame Concept [mailto:[EMAIL PROTECTED] Envoyé : jeudi 13 avril 2006 10:22 À : prog@fr.openoffice.org Objet : [prog] Positionnement curseur dans entete ou pied de page Bonjour, Grace a votre aide j'ai réussi a créer et écrire dans un entête et un pied de page sous oOWriter ... Apparemment il est impossible de gérer comme sous Office les parties de ceux-ci (droite, gauche, centre) de ce fait je souhaiterai mettre en forme le texte au centre... Pour cela je dois donc sélectionner le texte de l'entête ou du pied de page ... comment sélectionner le texte de l'entête  ou pied de page une fois celui-ci créé ? Ci-dessous mon code sous VB .NET pour création entête et pied de page ... si quelqu'un peux le compléter pour ensuite sélectionner le texte ? Sub InsererUnEnteteCentre(ByVal sTexteCentre As String)         Dim monTexte As Object, monCurseur As Object         Dim TexteCentre As Object, CurseurCentre As Object         Dim nomStyleMaPage As String, StyleMaPage As Object         Dim lesStylesPage As Object         monTexte = oDocument.Text         monCurseur = monTexte.createTextCursor         ' récupérer le nom du style de page en cours         nomStyleMaPage = monCurseur.PageStyleName         'print "Cette page est du style : " & nomStyleMaPage         ' récupérer la collection de styles de pages         lesStylesPage = oDocument.StyleFamilies.getByName("PageStyles")         ' récupérer le style de la page en cours         StyleMaPage = lesStylesPage.getByName(nomStyleMaPage)         With StyleMaPage             .HeaderIsOn = True ' insérer un entête             .HeaderBodyDistance = 1000 ' 10 mm             .HeaderHeight = 2500 ' 25mm             TexteCentre = .HeaderText ' zone de texte centre de l'entête         End With         CurseurCentre = TexteCentre.createTextCursor ' curseur centre dans l'entête         ' écrire un texte dans l'entête         TexteCentre.insertString(CurseurCentre, sTexteCentre, False)     End Sub Sub InsererUnPiedDePageCentre(ByVal sTexteCentre As String)         Dim monTexte As Object, monCurseur As Object         Dim TexteCentre As Object, CurseurCentre As Object         Dim nomStyleMaPage As String, StyleMaPage As Object         Dim lesStylesPage As Object         monTexte = oDocument.Text         monCurseur = monTexte.createTextCursor         ' récupérer le nom du style de page en cours         nomStyleMaPage = monCurseur.PageStyleName         'print "Cette page est du style : " & nomStyleMaPage         ' récupérer la collection de styles de pages         lesStylesPage = oDocument.StyleFamilies.getByName("PageStyles")         ' récupérer le style de la page en cours         StyleMaPage = lesStylesPage.getByName(nomStyleMaPage)         With StyleMaPage             .FooterIsOn = True ' insérer un pied de page             .FooterBodyDistance = 1000 ' 10 mm             .FooterHeight = 2500 ' 25mm             TexteCentre = .FooterText ' zone de texte centre du pied de page         End With         CurseurCentre = TexteCentre.createTextCursor ' curseur centre dans le pied de page         ' écrire un texte dans le pied de page         TexteCentre.insertString(CurseurCentre, sTexteCentre, False)   Merci d'avance !!   --------------------------------------------------------------------------------------- Wanadoo vous informe que cet e-mail a ete controle par l'anti-virus mail. Aucun virus connu a ce jour par nos services n'a ete detecte.