B4A Library [B4X] [XUI] AS PopupMenuAdvanced based on xCustomListView

This is a PopupMenu with a xCustomListView, so you can add simply new rows. And also add build in separator or title without having to worry about it yourself.

Not all functions of the normal PopupMenu are available yet. For now it has only the functions I needed for my project.

I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal or with a coffee.

This view is tested on B4A, B4I and B4J. Screenshot from my project.

ASPopupMenuAdvanced
Author: Alexander Stolte
Version: 1.01

• ASPM_SeparatorPropertiesAdvanced
  • Fields:
    • BackgroundColor As Int
    • Height As Float
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
  • Functions:
    • Initialize
      Initializes the fields to their default value.
• ASPM_TitleLabelPropertiesAdvanced
  • Fields:
    • BackgroundColor As Int
    • Height As Float
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • ItemBackgroundColor As Int
    • LeftRightPadding As Float
    • TextAlignment_Horizontal As String
    • TextAlignment_Vertical As String
    • TextColor As Int
    • xFont As B4XFont
  • Functions:
    • Initialize
      Initializes the fields to their default value.
• ASPopupMenuAdvanced
  • Events:
    • ItemClick (Index As Int, Tag As Object)
    • ItemLongClick (Index As Int, Tag As Object)
    • MenuClosed
  • Fields:
    • AutoHideMs As Int
    • CloseDurationMs As Int
    • OpenDurationMs As Int
  • Functions:
    • AddItem (xPnl As B4XView, Value As Object) As String
      Add a item e.g. a panel with checkboxes
    • AddItemAt (Index As Int, xPnl As B4XView, Value As Object) As String
      Add a item at a special index
    • AddSeparator As String
      Add a separator
    • AddTitle (Text As String, Height As Float) As String
      Add a title
    • Class_Globals As String
    • Clear As String
      Clears the list
    • CloseMenu As String
      Close the menu
    • CreateASPM_SeparatorPropertiesAdvanced (Height As Float, BackgroundColor As Int) As ASPM_SeparatorPropertiesAdvanced
    • CreateASPM_TitleLabelPropertiesAdvanced (TextColor As Int, xFont As B4XFont, TextAlignment_Vertical As String, TextAlignment_Horizontal As String, BackgroundColor As Int, ItemBackgroundColor As Int, LeftRightPadding As Float, Height As Float) As ASPM_TitleLabelPropertiesAdvanced
    • getCustomListView As b4a.example3.customlistview
      gets the xCustomListView
    • getOrientationHorizontal_LEFT As String
    • getOrientationHorizontal_MIDDLE As String
    • getOrientationHorizontal_RIGHT As String
    • getOrientationVertical_BOTTOM As String
    • getOrientationVertical_TOP As String
      Vertical = Top,Bottom
      Horizontal = Left,Middle,Right
    • getSeparatorProperties As ASPM_SeparatorPropertiesAdvanced
      change the separator properties, call it before you add the title
      <code>ASScrollingTags1.TitleLabelProperties.xFont = xui.CreateDefaultBoldFont(20)</code>
    • getTitleLabelProperties As ASPM_TitleLabelPropertiesAdvanced
      change the label properties, call it before you add the title
      <code>ASScrollingTags1.TitleLabelProperties.xFont = xui.CreateDefaultBoldFont(20)</code>
    • Initialize (Parent As B4XView, CallBack As Object, EventName As String) As String
      Initializes the object. You can add parameters to this method if needed.
    • IsInitialized As Boolean
      Tests whether the object has been initialized.
    • OpenMenu (Width As Float, Height As Float)
      Opens the menu
    • OpenMenuOnView (xView As B4XView, Width As Float, Height As Float)
      Opens the menu attached to a view
    • Resize (ParentWidth As Float, ParentHeight As Float) As String
    • setActivityHasActionBar (value As Boolean) As String
    • setCornerRadius (radius As Int) As String
      sets the corner radius from the menu
    • setDividerHeight (height As Int) As String
    • setIsInSpecialContainer (value As Boolean) As String
      set it true if the target is on a listview or as a child on a panel where the left and top values differ from the form
    • setMenuViewGap (Gap As Float) As String
      sets the gap between the menu and the attached view
      only affected if you open the menu with OpenMenuOnView
    • setOrientationVertical (orientation As String) As String
    • ViewScreenPosition (view As B4XView) As Int()
  • Properties:
    • ActivityHasActionBar
    • CornerRadius
      sets the corner radius from the menu
    • CustomListView As b4a.example3.customlistview [read only]
      gets the xCustomListView
    • DividerHeight
    • IsInSpecialContainer
      set it true if the target is on a listview or as a child on a panel where the left and top values differ from the form
    • MenuViewGap
      sets the gap between the menu and the attached view
      only affected if you open the menu with OpenMenuOnView
    • OrientationHorizontal_LEFT As String [read only]
    • OrientationHorizontal_MIDDLE As String [read only]
    • OrientationHorizontal_RIGHT As String [read only]
    • OrientationVertical
    • OrientationVertical_BOTTOM As String [read only]
    • OrientationVertical_TOP As String [read only]
      Vertical = Top,Bottom
      Horizontal = Left,Middle,Right
    • SeparatorProperties As ASPM_SeparatorPropertiesAdvanced [read only]
      change the separator properties, call it before you add the title
      <code>ASScrollingTags1.TitleLabelProperties.xFont = xui.CreateDefaultBoldFont(20)</code>
    • TitleLabelProperties As ASPM_TitleLabelPropertiesAdvanced [read only]
      change the label properties, call it before you add the title
      <code>ASScrollingTags1.TitleLabelProperties.xFont = xui.CreateDefaultBoldFont(20)</code>

Changelog

• 1.00
  • Release
• 1.01
  • Add OpenMenuOnView - opens the view attached on a view
  • Add set IsInSpecialContainer - set it true if the target is on a listview or as a child on a panel where the left and top values differ from the form
  • Add set ActivityHasActionBar
  • Add set OrientationVertical
  • Add set MenuViewGap - sets the gap between the menu and the attached view
    • only affected if you open the menu with OpenMenuOnView
• 1.02
  • Add get isOpen - checks if the menu is open
• 1.03
  • Add set MenuViewGap - sets the gap between the menu and the attached view
  • Add get TriangleProperties
  • Add set ShowTriangle - only visible if you open the menu with OpenMenu
    • Default: False
• 1.04
  • BugFix
• 1.05
  • BugFixes
  • Add OpenMenuAdvanced - You can set the Left, Top and Width value to show the menu on the parent
• 1.06
  • Add get BackgroundPanel

Have Fun

 

[Alexander Stolte]

In the next version, its possible to add the menu to a view like in the normal version, but in the advanced version you can put your own layout into the menu.

Sneak Preview of what is possible:

You want a nice combobox? no problem:

 

[Alexander Stolte]

Update

• 1.01
  • Add OpenMenuOnView - opens the view attached on a view
  • Add set IsInSpecialContainer - set it true if the target is on a listview or as a child on a panel where the left and top values differ from the form
  • Add set ActivityHasActionBar
  • Add set OrientationVertical
  • Add set MenuViewGap - sets the gap between the menu and the attached view
    • only affected if you open the menu with OpenMenuOnView

it is now possible to fix the popup menu to a view. This gives the possibility to do things like in the last comment.

ComboBox Example:

[B4X] AS PopupMenuAdvanced - ComboBox

This is a small example to demonstrate what is possible with the beautiful view. https://www.b4x.com/android/forum/threads/b4x-xui-as-popupmenuadvanced-based-on-xcustomlistview.135874/ The combobox consists of the following components: Base Panel that holds the 2 other views Label for the text...

www.b4x.com

 

[Ferdari]

Update

• 1.01
  • Add OpenMenuOnView - opens the view attached on a view
  • Add set IsInSpecialContainer - set it true if the target is on a listview or as a child on a panel where the left and top values differ from the form
  • Add set ActivityHasActionBar
  • Add set OrientationVertical
  • Add set MenuViewGap - sets the gap between the menu and the attached view
    • only affected if you open the menu with OpenMenuOnView

it is now possible to fix the popup menu to a view. This gives the possibility to do things like in the last comment.

ComboBox Example:

[B4X] AS PopupMenuAdvanced - ComboBox

This is a small example to demonstrate what is possible with the beautiful view. https://www.b4x.com/android/forum/threads/b4x-xui-as-popupmenuadvanced-based-on-xcustomlistview.135874/ The combobox consists of the following components: Base Panel that holds the 2 other views Label for the text...

www.b4x.com

Hi Alex, How to check if menu is open?

IsOpen Boolean

 

[Alexander Stolte]

Update

• 1.02
  • Add get isOpen - checks if the menu is open

 

[Ferdari]

Update

• 1.02
  • Add get isOpen - checks if the menu is open

Great Alex, thanks and keep the great work.

 

[Alexander Stolte]

Update

• 1.03
  • Add set MenuViewGap - sets the gap between the menu and the attached view
  • Add get TriangleProperties
  • Add set ShowTriangle - only visible if you open the menu with OpenMenuOnView
    • Default: False

Example:

aspma_Main.MenuViewGap = aspma_Main.TriangleProperties.Height + 2dip
aspma_Main.ShowTriangle = True
aspma_Main.TriangleProperties.Left = 150dip/2 - aspma_Main.TriangleProperties.Width/2 'Middle

 

[Ferdari]

Update

• 1.03
  • Add set MenuViewGap - sets the gap between the menu and the attached view
  • Add get TriangleProperties
  • Add set ShowTriangle - only visible if you open the menu with OpenMenuOnView
    • Default: False

View attachment 125170
Example:

aspma_Main.MenuViewGap = aspma_Main.TriangleProperties.Height + 2dip
aspma_Main.ShowTriangle = True
aspma_Main.TriangleProperties.Left = 150dip/2 - aspma_Main.TriangleProperties.Width/2 'Middle

Thanks for the update Alex!

 

[Alexander Stolte]

Update

• 1.04
  • BugFix

 

[Ferdari]

Update

• 1.04
  • BugFix

Is it possible to have round corners only on top or bottom?, to get the effect of button mix with menu on popup.

Thanks for the great work!

 

[Alexander Stolte]

Update

• 1.05
  • BugFixes
  • Add OpenMenuAdvanced - You can set the Left, Top and Width value to show the menu on the parent

 

[moore_it]

Hi Alexander, is possible to change the background color of the parent view during the menu is open like ASPopupMenu ?

Thanks for reply

 

[Alexander Stolte]

Update

• 1.06
  • Add get BackgroundPanel

Hi Alexander, is possible to change the background color of the parent view during the menu is open like ASPopupMenu ?

aspma_Main.BackgroundPanel.Color = xui.Color_Red

 

[moore_it]

No but it's not work with ASPopUpMenuAdvanced ...

 

[Alexander Stolte]

No but it's not work with ASPopUpMenuAdvanced ...

Update to 1.06!

 

[moore_it]

OOOOOppppssss Sorry !
Thanks

 

[Abdull Cadre]

Good job.

there is no way to get information about scroll / detect when the scroll reaches the end?

 

[Alexander Stolte]

There was a naming error with the b4xlib. The Name of the lib. was "ASPopupMenuAdvanded" instead of "ASPopupMenuAdvanced"
Is now fixed.

 

[Sepehr_b]

Hi Alex,
Thanks for this nice popup

in your PopupMenu , there is a color animated effect on the selected item background that the user get if the item is clicked.
but in PopupMenuAdvanced, it is missing.

 

[Alexander Stolte]

but in PopupMenuAdvanced, it is missing.

because you can add your own layout in the Advanced version. Therefore you need to add this animation your self.