How to add handler in runtime ?

xky · Feb 7, 2013

If I create some EditText in run time, how can i get their events? Such as Focus_Changed.
in the code DataLine is a list.

B4X:

Sub Button2_Click
   Dim ET As EditText
   ET.Initialize("ET")
   Activity.AddView(ET,0,120+DataLine.Size*65,100%x,60)
   ET.Text="New" & (DataLine.Size+1)
   DataLine.Add(ET)
End Sub

Erel · Feb 7, 2013

See this tutorial: Tick-Tack-Toe: working with arrays of views

Informatix · Feb 7, 2013

xky said:
If I create some EditText in run time, how can i get their events? Such as Focus_Changed.
in the code DataLine is a list.

B4X:

Sub Button2_Click Dim ET As EditText ET.Initialize("ET" & (DataLine.Size+1)) Activity.AddView(ET,0,120+DataLine.Size*65,100%x,60) ET.Text="New" & (DataLine.Size+1) DataLine.Add(ET) End Sub

You have to declare a generic handler:
ET_Click

In this handler, you get the sender (which EditText triggered the event):
Dim edt as EditText = Sender

If you want to store DataLine.Size+1, you can use the Tag property of the EditText.

thedesolatesoul · Feb 7, 2013

You cant add a handler in runtime. You can create as many handlers while coding if you know how to.
The better solution is to use a single handler/event for all the edit texts and put the DataLine.Size+1 in the Tag. You can then check for the Sender and its Tag in the event sub.

Informatix · Feb 7, 2013

thedesolatesoul said:
You cant add a handler in runtime.

Yes you can with the reflection library (SetOnClickListener), but it's useless here.

thedesolatesoul · Feb 7, 2013

Informatix said:
Yes you can with the reflection library (SetOnClickListener), but it's useless here.

You are correct, I forgot about that.
EDIT: Though what I meant was the 'event sub' cannot be added at runtime.

xky · Feb 7, 2013

Thanks for all

B4X:

Sub ET_FocusChanged (HasFocus As Boolean)
   Dim Etxt As EditText 
   Etxt=Sender
   If Etxt.Tag<>"" Then
      If HasFocus Then
         If Etxt.Text.SubString2(0,3)="New" Then Etxt.Text=""
      Else
         If Etxt.Text="" Then Etxt.Text="New" & Etxt.Tag 
      End If
   End If   
End Sub

Here's the code, it successfully handles 2 event (Lost and Get Focus of 2 EditText), it's great.
I just understand the name of sub is important and must correct, not as in VS2012, it can use any name I want.

Erel · Feb 7, 2013

The prefix can be any name you want (assuming that it matches the EventName parameter). The second part of the name determines the event.

How to add handler in runtime ?

xky

Member

Erel

B4X founder

Informatix

Expert

thedesolatesoul

Expert

Informatix

Expert

thedesolatesoul

Expert

xky

Member

Erel

B4X founder

How to add handler in runtime ?

Member

B4X founder

Expert

Expert

Expert

Expert

Member

B4X founder

Privacy & Transparency

Privacy & Transparency