B4A Library SD: MenuExtender

Star-Dust

Expert
Licensed User
Longtime User
Really nice work....
can add images direct from a url ????
Thank you. I see if I can add it to the next update.

Clearly if I have to download from the Internet 10 (or even 100) images, it may require a substantial amount of time before the interface appears
 

scsjc

Well-Known Member
Licensed User
Longtime User
Thank you. I see if I can add it to the next update.

Clearly if I have to download from the Internet 10 (or even 100) images, it may require a substantial amount of time before the interface appears
Yes, of course... can do load image in a groups 20 o 30 and when move the scrollview, continue loading.... is only a idea
i think really nice library
 

Star-Dust

Expert
Licensed User
Longtime User
Update to version 0.12

setImage (ID As String, Image As Bitmap)

use:
B4X:
For I=1 To 18
    ' Not set Image - Null
    catalog1.Add(I,Null,"Element " & I, "Code: " & I ,"Description " & I,"€. " )
Next
 
'Set image after
For I=1 To 18
    catalog1.setImage(I, LoadBitmap(File.DirAssets,filename(I)))
Next

Download Image from internet:
B4X:
For I=1 To 18
    catalog1.Add(I,Null,"Element " & I, "Code: " & I ,"Description " & I,"€. " )
Next

For I=1 To 18
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download(Link(i))
    Wait For (j) JobDone(j As HttpJob)
 
    If j.Success Then
        catalog1.setImage(I, j.GetBitmap)
    End If
    j.Release
Next



Note: ManagerPanel has been transferred to the PanelExtra Library
 
Last edited:

Johan Hormaza

Well-Known Member
Licensed User
Longtime User
B4X:
    Dim files As List
    files = File.ListFiles(File.DirRootExternal & "/Fotos")
    If files.Size = 0 Then
        ToastMessageShow("No se ha encontrado imagenes " & CRLF & File.DirRootExternal    & "/Fotos", True)
    Else
        For i = 0 To files.Size - 1
            catalog1.Add(I,LoadBitmap(File.DirRootExternal & "/Fotos",files.Get(I)),"Nombre" & I,"€. " & Rnd(1,4) & "." & Rnd(10,99),"AAA","2.000")
        Next
    End If
This is the code that I use. The problem is that my computer is slow when loading the application, which could be the problem so that it does not behave so slowly?
Thanks and blessings!!!
 

Star-Dust

Expert
Licensed User
Longtime User

Unfortunately it is not possible to speed it up, because this library is produced entirely in B4A and therefore is slower than those made entirely in Java.

More often it is designed to divide the various choices in the catalog.
In the first catalog should open photos and categories, clicking the category the catalog will be repopulated with the content of that category.

I do not know if it is suitable to use it for a ListFile, it is more suitable to create an App for the sale of products, similar to EBAY or to create a catalog of products of a company.
 

Star-Dust

Expert
Licensed User
Longtime User
If the photos are many it is better to use CustomListView, xCustomListView and UltimateListView. They are the fastest and most suitable for managing lots of data quickly.
If the images are less than 50, my Catalog can be fine and do not slow down.

Of course, an old device is slower ... A new device with my library is also fine with heavy DataBase.
 

Star-Dust

Expert
Licensed User
Longtime User
Version 0.13 released

Now allows multiple selection.
The examples have been updated, WARNING: The Select event now restores Array.

 
Last edited:

BluSky76

Member
Licensed User
Longtime User
[CODICE = b4x] catalog1.Add (I, Null, "Element Name Product Line1" & I, "Code:" & I, "Description" & I, "€.") [/ CODE]

The written "Element Name Product Line 1" is not displayed correctly but is cut off. You can increase the height of the Element field

Thanks
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…