[Gambas-user] WebView - Findtext

[Gianluigi]

So it is better written.
I forgot to mention that then after NO, you can try to enter 'banana'

Public Sub ButtonBox1_Click()

  If WebView1.FindText(ButtonBox1.Text,,, False) Then
    If Message.Question("xxx?", "Yes", "No") = 2 Then
      ButtonBox1.Clear
    Endif
    WebView1.FindText(ButtonBox1.Text,,, True)
  Else
    WebView1.SetFocus()
  Endif

End

Public Sub Form_Open()

  WebView1.HTML = "Banana<br>Apple<br>Pineapple<br>Pineapple<br>Banana"
  ButtonBox1.Text = "apple"

End

Regards
Gianluigi
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20210519/6bac64ac/attachment.htm>