Re: [libreoffice-users] gettextfields

I've created two "Text Boxes" in a form in a writer document.

I can iterate over them like this grabbing the text as I go 

Sub EnumerateFields

        oDoc = ThisComponent
        oDrawPage = oDoc.DrawPage
        oForm = oDrawPage.Forms.GetByIndex(0)
        For i = 0 To oForm.getCount()-1
           x = oForm.getByIndex(i)
           Print x.getName() & " : " & x.Text
        Next
  
End Sub


Does this help in anyway?

Iain


On Wednesday 08 May 2013 01:50:02 Vieri wrote:
> --- On Tue, 5/7/13, Vieri <rentorbuy@yahoo.com> wrote:
> > --- On Mon, 5/6/13, Andrew Douglas
> > Pitonyak <andrew@pitonyak.org>
> >
> > wrote:
> > > On 05/06/2013 05:21 AM, Vieri wrote:
> > > > Hi,
> > > >
> > > > I have an odt writer document with 2 input text
> >
> > fields
> >
> > > (added with the form designer toolbar). I manually type
> >
> > text
> >
> > > into one of the fields. I copy/pasted a macro to see if
> >
> > I
> >
> > > could grab the text within the input field but haven't
> >
> > had
> >
> > > any luck. This is the test macro in Basic:
> > > > Sub EnumerateFields
> > > >
> > > >    vEnum =
> > >
> > > ThisComponent.getTextFields().createEnumeration()
> > >
> > > >    If Not IsNull(vEnum) Then
> > > >      If vEnum.hasMoreElements() Then
> > > >        Print "OK"
> > > >      Else
> > > >        Print "NOT OK"
> > > >      End If
> > > >    End If
> > > >
> > > > End Sub
> > > >
> > > > If I manually run this macro I get the "NOT OK"
> > >
> > > message.
> > >
> > > > What am I doing wrong?
> > > > What is the correct way of getting the text field
> > >
> > > elements?
> > >
> > > > Thanks
> > > >
> > > > Vieri
> > >
> > > I grabbed these two routines from my test modules
> >
> > without
> >
> > > running them first....
> >
> > Hi,
> >
> > Thanks for the reply but I'm still having trouble.
> > I'm either way off-course, misusing LO or making a dumb
> > rookie mistake.
> >
> > I copied your macros to my odt document.
> > I then did a "tools, macros, run macro..." and selected the
> > Subs I copied.
> > If I run EnumerateTextFields then it yields the "Finished"
> > message box (nothing else).
> > If I run DisplayMasterFields then it yields the following
> > message:
> >
> > ===Text Field Masters===
> > (com.sun.star.text.fieldmaster.SetExpression.Illustration,Illustration)
> > (com.sun.star.text.fieldmaster.SetExpression.Table,Table)
> > (com.sun.star.text.fieldmaster.SetExpression.Text,Text)
> > (com.sun.star.text.fieldmaster.SetExpression.Drawing,Drawing)
> >
> > My odt document has 2 input fields in a form.
> >
> > By the way, if I place a button within my form and configure
> > the "Mouse button pressed" to launch, say,
> > EnumerateTextFields then I get the following error message:
> > "LibreOffice 4.0.2.2 BASIC runtime error. '423'
> > getTextFields" and it points at the line:
> > "oEnum = oDoc.getTextFields().createEnumeration()"
> >
> > I'm stuck on something that should be quite simple.
> > I'm attaching my odt file hoping that someone can tell me
> > what novice mistake I'm making.
>
> Trying to attach the file again but it seems that the mailing list strips it
> out.
>
> Thanks,
>
> Vieri

-- 
To unsubscribe e-mail to: users+unsubscribe@global.libreoffice.org
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
All messages sent to this list will be publicly archived and cannot be deleted