Android Question adding xCustomListView by code

[aligol]

I tried to add xCustomListView by code to activity by code but a yellow warning appeared that type do not match(warning#22).

How should I add CLVby only by codes?

     dim xlv as CustomListView
    xlv.Initialize(Me,"xlv")
    Activity.AddView(xlv,0,0,Activity.Width,Activity.Height)

 

[Alexander Stolte]

How should I add CLVby only by codes?

Create a new form and put the xclv on it. Then load the form to a panel, done.

[B4X] I need 100 <custom view here>s. How to add programmatically?

Custom views are designed to be added with the designer. It is however very simple to create a layout file with the custom view and load it multiple times. Tip: remove the call to AutoScaleAll from the designer script. Complete example: Sub Globals Private B4XSwitch1 As B4XSwitch End...

www.b4x.com

 

[aligol]

Create a new form and put the xclv on it. Then load the form to a panel, done.

thanks for your response.
pardon me for my ignorance
But does it possible to create an object of Xclv by code not designer(form) and put that on a panel or activity? If the answer is no,can you please explain why?

    Dim clv As CustomListView
    Dim pnl As Panel

    clv.Initialize(Me,"clv")
    pnl.Initialize("")
   
    Activity.AddView(pnl,0,0,Activity.Width,Activity.Height)
    pnl.AddView(clv,0,0,pnl.Width,pnl.Height)

 

[Alexander Stolte]

But does it possible to create an object of Xclv by code not designer(form) and put that on a panel or activity? If the answer is no,can you please explain why?

It works, but it is very messy.
I do this exactly the same way in my custom views where I use them.

Private Sub ini_xclv

    Dim tmplbl As Label
    tmplbl.Initialize("")
 
    Dim tmpmap As Map
    tmpmap.Initialize
    tmpmap.Put("DividerColor",0x00FFFFFF)
    tmpmap.Put("DividerHeight",0)
    tmpmap.Put("PressedColor",0x00FFFFFF)
    tmpmap.Put("InsertAnimationDuration",0)
    tmpmap.Put("ListOrientation",m_Orientation)
    tmpmap.Put("ShowScrollBar",False)
    
    xclv_main.Initialize(Me,"xclv_main")
    xclv_main.DesignerCreateView(mBase,tmplbl,tmpmap)
    
End Sub