Android Question xcustomlistview show an object near clicked item

[Addo]

i have two xcustomlistview in my project first clv called CustomListView1 and i use it as chat box
second clv called copymenu and i use it as menu

i am trying to place copymenu at the position of the clicked item of CustomListView1 in a previous thread Erel Suggested to do the following

Sub CustomListView1_ItemClick (Index As Int, Value As Object)
    copymenu.AsView.Top = CustomListView1.GetPanel(Index).Top - CustomListView1.sv.ScrollViewOffsetY + CustomListView1.GetBase.Top
    If copymenu.AsView.Visible = True Then
        copymenu.AsView.Visible = False

    else If copymenu.AsView.Visible = False Then

        copymenu.AsView.Visible = True

    End If
End Sub

but the copy menu position is always showing on top not near the clicked item as it should be

what could be my mistake ?

 

[Erel]

copymenu.AsView.Visible = Not(copymenu.AsView.Visible)

The code looks correct. Add some logs to understand the result of this calculation.

Maybe you have added the lists to different parents?

 

[Addo]

i have logged copymenu Top property each time item clicked it return Zero

the clicked items list i added like that

Sub CreateListItem(Text As String, Width As Int, Height As Int) As Panel
   
    Dim p As Panel
    p.Initialize("")
    p.SetLayout(0, 0, Width, Height)
    p.LoadLayout("cellitem")
    lbltextbox.Text = Text
    lbltextbox.Height = Height
    lbltextbox.TextColor = 0xff000000
    Return p
End Sub

 

[Addo]

also each calculation value is equal to zero

CustomListView1.GetPanel(Index).Top - CustomListView1.sv.ScrollViewOffsetY + CustomListView1.GetBase.Top

 

[klaus]

Can you post a small test project showing the problem, so we could test it?

 

[Addo]

Hello the actual project attached here

https://www.b4x.com/android/forum/threads/xcustomlistview-item-position-and-keyboard.91212/

 

[klaus]

I had a deeper look at your problem.

It seems that is a problem with the GetPanel method in the xCustomListView.
The original routine is:

Public Sub GetPanel(Index As Int) As B4XView
    Return GetItem(Index).Panel.GetView(0)
End Sub

With the routine above, CustomListView1.GetPanel(Index).Top always returns 0.

With this routine it works.

Public Sub GetPanel(Index As Int) As B4XView
'    Return GetItem(Index).Panel.GetView(0)
    Return GetItem(Index).Panel
End Sub

With the routine above, CustomListView1.GetPanel(Index).Top always returns the correct value.

It seems that there are two Panels for each CustomListView item.

 

[Addo]

this raised exception

java.lang.RuntimeException: Object should first be initialized (View).

 

[klaus]

How did you implement it?
THe code is in the CustomView code.

Attached my test project.

 

[Addo]

i have just edited the library bas function i will look at the attachment

 

[Addo]

this raise exception if you will use this list in other purpose as example changing something in certain item

Public Sub updateanitem
Dim p As B4XView = clvlist.GetPanel(0)
p.GetView(0).Text = "something new "
      
End Sub

notice that in my none test app

 

[klaus]

I know that is a problem and I think that Erel needs to look at this.
To get the Top property we need: Return GetItem(Index).Panel
For the other properties we need: Return GetItem(Index).Panel.GetView(0)
It seems that there are two panels or B4XViews superimposed.
The first one holds the position, the dimesions are the same, and the second, a child of the first, holds the underlying views.

 

[Erel]

Klaus is right. Panel.Top will always return 0.

However you don't need to modify the module. You should get the parent's Top.
Change the code to:

copymenu.AsView.Top = CustomListView1.GetPanel(Index).Parent.Top - CustomListView1.sv.ScrollViewOffsetY + CustomListView1.GetBase.Top