Guys I need some help. When the program starts and I select to add a new record, the keyboard pops up and has the Next button. As it should. As I press Next it tabs through the fields just as it should. Now I have finished filling in page 1 and click the BtnNxtP button which loads the Panel Layout of my next page. As long as I select each field myself and enter the data all is fine. If I tab using the keyboards Next button, the panel looses focus. Once the cursor is gone if I type a few letters and go back to the first page, my letters are in some other field on the first page. This should not be. How is the focus going through my panel and why does it not follow the tab order of the second page? I hope as I activate the second page, I don't have to add code .Enabled=False for all the Controls on the first page and they set them back Enabled. Any Help Please. The code sniplets are listed below:
Thanks,
Margret
Thanks,
Margret
B4X:
Sub Globals
Dim pnlInput, pnlSelect, PanelMain As Panel
End Sub
Sub BtnNxtP_Click
PanPop("entry2.bal", 0, 0)
If BtnAdd.Text = "Add" Then
Efacebook.Text = mface
Etwitter.Text = mtwit
Emyspace.Text = mmy
Eurlwork.Text = murlw
Eurlpersonal.Text = murlp
Ebirthday.Text = mbirth
Eanniversary.Text = mann
Elikes.Text = mlike
Edislikes.Text = mdis
Enotesee.Text = mnotesee
Else
Efacebook.Text = ""
Etwitter.Text = ""
Emyspace.Text = ""
Eurlwork.Text = ""
Eurlpersonal.Text = ""
Ebirthday.Text = ""
Eanniversary.Text = ""
Elikes.Text = ""
Edislikes.Text = ""
Enotesee.Text = ""
End If
Efacebook.RequestFocus
End Sub
Sub PanPop ( mlayout As String, hc As Int, wc As Int) '( mlayout=your .bal file, hc=height offset + or -, wc=same for width )
pnlSelect.Initialize ( "Select")
pnlInput.Initialize ("")
pnlInput.LoadLayout ( mlayout )
pnlSelect.Color = Colors.ARGB (150,0,0,0)
Activity.AddView (pnlSelect, 0, 0, 100%x, 100%y)
mh1=(pnlSelect.Height/2) - (PanelMain.Height/2) + hc
mw1=pnlSelect.Width/2 - (PanelMain.Width/2) + wc
mh2=PanelMain.Height
mw2=PanelMain.Width
pnlSelect.AddView (pnlInput, mw1, mh1, mw2, mh2)
End Sub
Sub Select_Click ' Stop clicks on Select panel getting to panel underneath
End Sub
Last edited: