Private Sub B4XFloatTextField1_FocusChanged (HasFocus As Boolean)
If HasFocus Then
If B4XFloatTextField1.Text = "" Then
B4XFloatTextField1.HintText = "Full name"
Else
B4XFloatTextField1.HintText = "Write your full name here Or John Smith"
End If
Else
If B4XFloatTextField1.Text = "" Then
B4XFloatTextField1.HintText = "Write your full name here Or John Smith"
End If
End If
B4XFloatTextField1.Update
End Sub