Detect and delete (textual) empty Pages in Writer with UNO API

You can enumerate all paragraphs and iterate through them. To get the pagenumber of a paragraph you must use the viewcursor. So if all paragraphs with the same pagenumber are empty you could delete them. Can’t help you with java code.

Hi, I was about to write an example in Basic (can’t in java) and had to look how to delete paragraphs when I stumbled across these threads with java code. Perhaps this can be of further help. https://forum.openoffice.org/en/forum/viewtopic.php?f=44&t=16285 http://stackoverflow.com/questions/2511216/openoffice-with-net-how-to-iterate-throught-all-paragraphs-and-read-text

I became aware that it is easy to just delete all empty paragraphs with an enumeration but my initial idea with collecting pagenumber information is a bit complicated because when you got the pagenumber of a paragraph and move on to get the next I don’t know how to come back. I mean you must first go through multiple paragraphs before you know if they are on one page or not. And when you know it then you already have gone too far.
Here is a little basic code that lets you delete all empty paragraphs of a document. For information purposes I left in the additional steps for
1.passing tables and
2. of moving the viewcursor to the paragraph for getting pagenumber although it isn’t used for anything here.

Note: If there is an image anchored to an empty paragraph it will also be deleted with the paragraph.

sub deleteparas

oDocSrc   = ThisComponent

      oVCursSrc   = oDocSrc.CurrentController.getViewCursor()     

      'loop through all of the paragraphs in the source document
      oParEnum = oDocSrc.getText().createEnumeration()
      Do While oParEnum.hasMoreElements()

      oPar = oParEnum.nextElement()

      'fix for using tables:
        Do while oPar.supportsService("com.sun.star.text.TextTable")
        oPar = oParEnum.nextElement()
        loop

        oVCursSrc.gotoRange(oPar,false)
        oVCursSrc.gotoendofline(false)
   curpagenumber = oVCursSrc.page

          If  len(oPar.getString()) = 0 Then

		oPar.dispose

          End If

      Loop
end sub