B4A Library StdActionBar - Another ActionBar library

Myr0n

Active Member
Licensed User
Longtime User
Do you think that, the Action overflow is coming in the next release of the stdactionbar library?

In the meantime, somebody know how to add the action overflow menu to the stdactionbar?
 

Myr0n

Active Member
Licensed User
Longtime User
You are right and I was testing in my samsung galaxy note 10.1 ver 2014, and is just there that does not work.
I tested in my s5 and works very well.

Look the screenshowt of my tablet.
Android version 4.4.2,
Kernel version 3.4.39-1462259

it's definitely my tablet, and I do not know what to do to fix it.

Somebody has the same issue?

I am sorry.
 

Attachments

  • ScreenShot_resize.jpg
    26.1 KB · Views: 301

Myr0n

Active Member
Licensed User
Longtime User
Ups! my bad, I'm definitely an android beginner, sorry.
 

Davin

Member
Licensed User
Longtime User
i pretty much get the same error message too
 

RandomCoder

Well-Known Member
Licensed User
Longtime User
Check to make sure that you haven't set IncludeTitle to false in the Activity attributes.
 

imgsimonebiliato

Well-Known Member
Licensed User
Longtime User
Hello,
everytime I do:

B4X:
SlidePage.Initialize("SlidePage", 3, 100%x, 100%y)

I have this error:
java.lang.NoClassDefFoundError: android.support.v4.view.ViewPager

Obviously I have already copied the file android-support-v4.jar into the additional lib folder.
Please help
 

imgsimonebiliato

Well-Known Member
Licensed User
Longtime User
It's the file in the first post
 

imgsimonebiliato

Well-Known Member
Licensed User
Longtime User
I referred to the StdActionBar library.
If you think that my android-support-v4 file is corrupted, please I need this file, because I've already downloaded from the SDK
 

MarcoRome

Expert
Licensed User
Longtime User

if i want add :

B4X:
     AdView1.Initialize2("Ad", "ca-app-pub-7335111176005677/2XXXXXX", AdView1.SIZE_SMART_BANNER)
     If GetDeviceLayoutValues.ApproximateScreenSize < 6 Then
      'phones
     If 100%x > 100%y Then height = 32dip Else height = 50dip
         Else
      'tablets
      height = 90dip
     End If
     Activity.AddView(AdView1, 0dip, 100%y - height, 100%x, height)
     AdView1.LoadAd

i dont see nothing also if i change:

B4X:
Sub bar_TabChanged(Index As Int, STab As StdTab)
   Activity.RemoveAllViews
   Dim pnl As Panel = STab.Tag
   Dim height As Int
   If 100%y > 100%x Then
     height = 100%y - 48dip 'fix for the additional tabs height
   Else
     height = 80%y '<----------------------- ALSO IF CHANGE THIS 80%y
   End If
   Activity.AddView(pnl, 0, 0, 100%x, height)
   Activity.AddView(AdView1, 0dip, 100%y - height, 100%x, height) '<--- Add this
   AdView1.LoadAd
   If pnl.NumberOfViews = 0 Then
     pnl.LoadLayout(Index)
   End If
End Sub
Any idea ??
Thank you
 

MarcoRome

Expert
Licensed User
Longtime User
How is this code related to StdActionBar?
Hi Erel, yes i have this code:

in activity_create

B4X:
'Activity.LoadLayout("information_phone")
'Per Pubblicità
    AdView1.Initialize2("Ad", "ca-app-pub-7335111176005677/2xxxxxx", AdView1.SIZE_SMART_BANNER)
     If GetDeviceLayoutValues.ApproximateScreenSize < 6 Then
      'phones
     If 100%x > 100%y Then height1 = 32dip Else height1 = 50dip
        Else
      'tablets
      height1 = 90dip
     End If
'    Activity.AddView(AdView1, 0dip, 100%y - height, 100%x, height)
'    AdView1.LoadAd
'Fine Pubblicita
....
'Menu
    bar.Initialize("bar")
    bar.NavigationMode = bar.NAVIGATION_MODE_TABS 'change to list to see the other mode
    Activity.Title = "SIM Card PRO"
    bar.Subtitle = "By Devil-App"
  
    Activity.AddMenuItem3("MenuItem", "mi", LoadBitmap(File.DirAssets, "ic_action_share.png"), True)
    panel1.Initialize("")
    panel2.Initialize("")
    'panel1.Height = 90


    bar.AddTab("INFO SIM CARD").Tag = panel1
    bar.AddTab("CONTACT").Tag = panel2
  
    If bar.NavigationMode = bar.NAVIGATION_MODE_TABS Then
        'set the current selected tab
        bar.SelectedIndex = currentTab
        If currentTab = 0 Then bar_TabChanged(currentTab, bar.SelectedTab)
    End If

and in another event this code:

B4X:
Sub bar_TabChanged(Index As Int, STab As StdTab)
    Activity.RemoveAllViews
    Dim pnl As Panel = STab.Tag
    pnl.Color = Colors.Black <---- This is color black pnl
    Dim height As Int
    If 100%y > 100%x Then
        height = 100%y - 48dip
    Else
        height = 90%y
    End If
'    Activity.AddView(pnl, 0, 0, 100%x, height)
    Activity.AddView(pnl, 0, 0, 100%x, 80%y)
    Activity.AddView(AdView1, 0dip, 100%y - height1, 100%x, height1)
    AdView1.LoadAd
    If pnl.NumberOfViews = 0 Then
        pnl.LoadLayout(Index)
    End If
End Sub

Now the problem when start Adview i see this.. but in background...as if it were on a panel ( ?? ) look pictures


Thank you for your support.
 
Last edited:
Cookies are required to use this site. You must accept them to continue using the site. Learn more…