Bonjour Martin,

Et j'obtient comme r�sultat : La Terre est bleueComme une orange
sur la premi�re ligne de mon nouveau document qui ne contient toujours qu'une seule page.



il te faut inserer un saut de paragraphe avant le saut de page cr un document vierge ne contient qu'un seul paragraphe



Dim Moncurseur as object Dim MonTexte as object 'Dim saut as integer Mondocument = ThisComponent MonTexte = Mondocument.Text Moncurseur = MonTexte.createTextCursor MonTexte.insertString(Moncurseur, "La Terre est bleue ", False) Moncurseur.gotoNextParagraph(False)

 'Inserer un saut de paragraphe
 saut = com.sun.star.text.ControlCharacter.PARAGRAPH_BREAK
 monTexte.insertControlCharacter(MonCurseur,saut, false)

 saut = com.sun.star.style.BreakType.PAGE_BEFORE
 Moncurseur.breakType = saut
 MonTexte.insertString(Moncurseur, "Comme une orange", False)


Help, je craque !

Je pense que ca vaut un errata afin de tenir compte de ce cas particulier dans l'exemple. Je le publie des que possible (probablement dans le week end)
http://oooconv.free.fr/livre/errata.html


Cordialement

Laurent

--
Laurent Godard <[EMAIL PROTECTED]> - Ing�nierie OpenOffice.org
Indesko >> http://www.indesko.com
Nuxeo CPS >> http://www.nuxeo.com - http://www.cps-project.org
Livre "Programmation OpenOffice.org", Eyrolles 2004


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]



Répondre à