B4J Question B4X view: text field with a button

[peacemaker]

Hi, All

Do we have a ready cross-platform view: a text edit field with an extra button (for custom click event) at the right side ?

 

[Erel]

B4XFloatTextField shows several "buttons" (labels actually) at the right side.

There is really nothing special, just add a label or button at the right side.

 

[peacemaker]

Just a view to choose the folder path is needed. I guess, the button is the must with a custom text and action, placing the path into the text field.

 

[LucaMs]

Hi, All

Do we have a ready cross-platform view: a text edit field with an extra button (for custom click event) at the right side ?

B4XFloatTextField shows several "buttons" (labels actually) at the right side.

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
 
    B4XFloatTextField1.HintText = "Select folder"
    B4XFloatTextField1.Update
    B4XFloatTextField1.lblV.Text = Chr(0xE24D)
    B4XFloatTextField1.lblV.TextColor = xui.Color_Blue
    B4XFloatTextField1.Text = " "
    B4XFloatTextField1.RequestFocusAndShowKeyboard
End Sub

Private Sub B4XFloatTextField1_EnterPressed
    Dim DC As DirectoryChooser
    DC.Initialize
    Dim SelectedDir As String
    SelectedDir = DC.Show(B4XPages.GetNativeParent(Me))
    If SelectedDir.Length = 0 Then
        SelectedDir = " "
    End If
    B4XFloatTextField1.Text = SelectedDir
    B4XFloatTextField1.RequestFocusAndShowKeyboard
End Sub

Note that this is a gimmick, the functionality is not the best.

 

[peacemaker]

'Note for Erel: the HintText property does not work (programmatically).

Use B4XFloatTextField.Update method after B4XFloatTextField.HintText change.

 

[LucaMs]

Use B4XFloatTextField.Update method after B4XFloatTextField.HintText change.

Yes, done right now (adding icon color).