iOS Question Expected: JVFloatLabeledTextField, object type: UITextField in B4i

[Pedro Caldeira]

Hello All,
I have a FloatLabeledTextField created by the designer, with several views, buttons, labels, etc.
Id the proprerties of on of the buttons I have the following code:

Sub CLAButtonSearchText_Click
    Dim this As Button = Sender
    Dim pthis As Panel = this.Parent
    Dim ftxt As FloatLabeledTextField = pthis.Getview(3)
    Log(ftxt.tag)
    CLAButtonSearchTextCall(ftxt, this)
End Sub

I get a crash Error when I click it: Expected: JVFloatLabeledTextField, object type: UITextField

Why ? How can I solve it ?

 

[Erel]

Why??? Switch to B4XFloatLabeledTextField from XUI Views.
Tip: you should never see "panel" in your code. Switch to B4XView. Simpler, cross platform and more powerful.

 

[Pedro Caldeira]

Why??? Switch to B4XFloatLabeledTextField from XUI Views.
Tip: you should never see "panel" in your code. Switch to B4XView. Simpler, cross platform and more powerful.

You mean "B4XFloatTextField" ? I cannot find "B4XFloatLabeledTextField"

 

[Pedro Caldeira]

strange that Tag does not work neither parent with a simple button using b4xview instead of panel and B4XFloatTextField, instead of FloatLabeledTextField. What could I be doing wrong?

Sub CLAButtonSearchTextCall(this As B4XFloatTextField, othis As Button)
    ShareCode.isChapterSearch = False
    Dim pthis As B4XView = this.parent  <--- Error (Unknown member: parent)
End Sub

Sub CLAButtonSearchText_Click
    Dim this As Button = Sender
    Dim pthis As B4XView = this.Parent
    Dim ftxt As B4XFloatTextField = pthis.Getview(3)
    Log(ftxt.Tag)  <--- Error ([<B4IPanelView 0x109bfc360> valueForUndefinedKey:]: this class is not key value coding-compliant for the key _tag.)
    CLAButtonSearchTextCall(ftxt, this)
End Sub

How come a B4XFloatTextField does not have the parent property ?
I am sure that I am doing something wrong, but what?

Dim this As B4XFloatTextField
Dim pThis As B4XView = this.parent <-- property does not exists

Even with mBase I get the same error ([<B4IPanelView 0x1261d26a0> valueForUndefinedKey:]: this class is not key value coding-compliant for the key _mbase.)
in the code_

Dim pThis As B4XView = this.mBase.parent

Can someone, please help ?

 

[Erel]

Check this tutorial: https://www.b4x.com/android/forum/threads/117992/#content

 

[Pedro Caldeira]

The tag issue is solved, but not the parent.
I have a simple declaration like that and it crashes.

' *************************************************************
Sub CLAButtonSearchTextCall(this As B4XFloatTextField, othis As Button)

    ShareCode.isChapterSearch = False
    Dim pthis As B4XView = this.mBase.Parent <--Crashes HERE with the error below.
.....

ERROR : [<B4IPanelView 0x1297a5e30> valueForUndefinedKey:]: this class is not key value coding-compliant for the key _mbase.

 

[Erel]

Post the call to CLAButtonSearchTextCall.

You are missing a ".Tag" there.

 

[Pedro Caldeira]

Post the call to CLAButtonSearchTextCall.

You are missing a ".Tag" there.

Sub CLAButtonSearchText_Click
    Dim this As Button = Sender
    Dim pthis As B4XView = this.Parent
    Dim ftxt As B4XFloatTextField = pthis.Getview(3)
    CLAButtonSearchTextCall(ftxt, this)
End Sub

a ".Tag" ? Where?

 

[Erel]

This line cannot be correct:

  Dim ftxt As B4XFloatTextField = pthis.Getview(3)

It is explained in this tutorial: https://www.b4x.com/android/forum/threads/117992/#content

  Dim ftxt As B4XFloatTextField = pthis.Getview(3).Tag

 

[Pedro Caldeira]

Ok,
But how can I still use the Tag property to set and retrieve text ?
and I cannot get ftxt parent nevertheless.
Only the mBase of FTxt has a parent property

Dim FTxt As B4XFloatTextField = pthis.Getview(3).Tag
dim pThis as b4xView = FTxt.parent <- Property does not exists

 

[Erel]

But how can I still use the Tag property to set and retrieve text ?

You can store whatever you like in Ftxt.Tag.

Ftxt is not a view. Ftxt.mBase is the base view.

 

[Pedro Caldeira]

You can store whatever you like in Ftxt.Tag.

Ftxt is not a view. Ftxt.mBase is the base view.

and beeing the base view, this:

dim pThis as b4xView = FTxt.parent

should be replaced with this:

dim mB as panel = FTxt.mBase
dim pThis as b4xview = mB.Parent

is that correct ?

 

[Erel]

You should never see "panel" in your code.

dim pThis as b4xView = FTxt.mBase.parent

Or Dim mB As B4XView = Ftxt.mBase