Dim ItemHeight Come Int: ItemHeight = 45dip
Dim TextSize Come Float: TextSize = 16 'NON immergere.
TextLeftPos Dim come INT: TextLeftPos = 40DIP
Dim TextColor Come Int: TextColor = Colors.LightGray
Dim TopPadding Come Int: TopPadding = 5dip
Dim ImageWidth Come Int: ImageWidth = 16DIP
Dim ImageHeight Come Int: ImageHeight = 16DIP
ImageLeftPos Dim come INT: ImageLeftPos = 10dip
ImageTopPos Dim come INT: ImageTopPos = (ItemHeight - ImageHeight) / 2
Dim SelectionColor Come Int: SelectionColor = 0xFFFF8000
[/ Code]
Lo sfondo è un'immagine nove patch. Vedere questo tutorial per ulteriori informazioni su queste immagini: [URL='http://www.b4x.com/forum/showthread.php?p=80908']Nove immagini di patch esercitazione[/URL]
Il seguente codice mostra come creare e mostrare questo elenco:
[Code]
Global Sub
Dim al Come ActionList
End Sub
Sub Activity_Create (FirstTime As Boolean)
Activity.LoadLayout ("1")
al = ActionListModule.InitializeList (150dip, "Scegli azione", "Main")
ActionListModule.AddActionItem ("Articolo # 1" al,, LoadBitmap (File.DirAssets, "bomb.png"), 1)
ActionListModule.AddActionItem (al, "Item # 2", LoadBitmap (File.DirAssets, "book_add.png"), 2)
ActionListModule.AddActionItem ("# articolo 3" al,, LoadBitmap (File.DirAssets, "book_open.png"), 3)
ActionListModule.AddActionItem (al, "Item # 4", LoadBitmap (File.DirAssets, "wrench.png"), 4)
ActionListModule.AddActionItem ("# articolo 5" al,, LoadBitmap (File.DirAssets, "wrench_orange.png"), 5)
ActionListModule.AddActionItem ("# articolo 6" al,, Null, 6)
End Sub
Sub ActionList_Touch (Azione Come Int, X come float, Y come Float) come booleano
'I delegati l'evento di tocco al modulo di codice
ActionListModule.Touch (Sender, Azione, X, Y)
Ritorno Vero
End Sub
Sub Activity_KeyPress (KeyCode Come Int) come booleano
'Premendo il tasto indietro, mentre la lista è visibile chiuderà la lista
Se KeyCode = KeyCodes.KEYCODE_BACK E al.Visible Poi
ActionListModule.Hide (al)
Ritorno Vero
End If
End Sub
'Questo sub viene generato quando l'utente preme su un elemento
'ReturnValue è il valore assegnato alla voce selezionata
Sub ActionList_Result (ReturnValue As Object)
Log (ReturnValue)
ToastMessageShow ("ReturnValue =" & ReturnValue, True)
End Sub
Sub btnShow_Click
ActionListModule.Show (al, Attività, 10dip, 10dip)
End Sub
Sub btnHide_Click
ActionListModule.Hide (al)
End Sub
[/ Code]
Nel modulo attività si dovrebbe avere ActionList variabile globale.
La riga seguente crea un nuovo ActionList e lo assegna alla variabile:
[Code]
al = ActionListModule.InitializeList (150dip, "Scegli azione", "Main")
[/ Code]
I parametri sono: larghezza, il titolo e il nome del modulo attività (necessaria per generare l'evento Risultato).
L'aggiunta di elementi viene fatto chiamando:
[Code]
ActionListModule.AddActionItem ("# articolo 5" al,, LoadBitmap (File.DirAssets, "wrench_orange.png"), 5)
[/ Code]
I parametri sono: variabile ActionList, una nota di testo, immagine articolo (o nullo) e il valore che verrà restituito quando l'utente fa clic su questo elemento.
Questo modulo richiede la libreria Animation (il menu svanisce in e out) e la biblioteca di riflessione (per l'immagine nove patch).
Come spiegato nel tutorial nove patch, l'immagine nove-patch si trova negli oggetti \ res \ drawable e deve essere di sola lettura.
Il codice è anche un buon esempio per la creazione di una visualizzazione personalizzata con un modulo di codice.
[B]Credits[/B]
Immagine di sfondo: [URL='http://android9patch.blogspot.com/']Android 9 cerotto[/URL]
Icone Esempio: [URL='http://famfamfam.com/lab/icons/silk/']famfamfam.com: Silk Icons[/URL] [/ quote]
[Quote = "Erel, palo: 81.206, membro: 1"] Il progetto allegato contiene un modulo di codice che è possibile utilizzare nei vostri progetti per mostrare un elenco personalizzato che l'utente può scegliere tra:
[IMG]http://www.b4x.com/basic4android/images/SS-2012-01-24_12.20.48.png[/IMG]
L'elenco viene compilato manualmente. Ciò significa che non dovrebbe essere troppo difficile da personalizzare e migliorare ulteriormente esso.
Ci sono diverse impostazioni che possono essere modificate in Process_Globals Sub:
[Code]
Dim ItemHeight Come Int: ItemHeight = 45dip
Dim TextSize Come Float: TextSize = 16 'NON immergere.
TextLeftPos Dim come INT: TextLeftPos = 40DIP
Dim TextColor Come Int: TextColor = Colors.LightGray
Dim TopPadding Come Int: TopPadding = 5dip
Dim ImageWidth Come Int: ImageWidth = 16DIP
Dim ImageHeight Come Int: ImageHeight = 16DIP
ImageLeftPos Dim come INT: ImageLeftPos = 10dip
ImageTopPos Dim come INT: ImageTopPos = (ItemHeight - ImageHeight) / 2
Dim SelectionColor Come Int: SelectionColor = 0xFFFF8000
[/ Code]
Lo sfondo è un'immagine nove patch. Vedere questo tutorial per ulteriori informazioni su queste immagini: [URL='http://www.b4x.com/forum/showthread.php?p=80908']Nove immagini di patch esercitazione[/URL]
Il seguente codice mostra come creare e mostrare questo elenco:
[Code]
Global Sub
Dim al Come ActionList
End Sub
Sub Activity_Create (FirstTime As Boolean)
Activity.LoadLayout ("1")
al = ActionListModule.InitializeList (150dip, "Scegli azione", "Main")
ActionListModule.AddActionItem ("Articolo # 1" al,, LoadBitmap (File.DirAssets, "bomb.png"), 1)
ActionListModule.AddActionItem (al, "Item # 2", LoadBitmap (File.DirAssets, "book_add.png"), 2)
ActionListModule.AddActionItem ("# articolo 3" al,, LoadBitmap (File.DirAssets, "book_open.png"), 3)
ActionListModule.AddActionItem (al, "Item # 4", LoadBitmap (File.DirAssets, "wrench.png"), 4)
ActionListModule.AddActionItem ("# articolo 5" al,, LoadBitmap (File.DirAssets, "wrench_orange.png"), 5)
ActionListModule.AddActionItem ("# articolo 6" al,, Null, 6)
End Sub
Sub ActionList_Touch (Azione Come Int, X come float, Y come Float) come booleano
'I delegati l'evento di tocco al modulo di codice
ActionListModule.Touch (Sender, Azione, X, Y)
Ritorno Vero
End Sub
Sub Activity_KeyPress (KeyCode Come Int) come booleano
'Premendo il tasto indietro, mentre la lista è visibile chiuderà la lista
Se KeyCode = KeyCodes.KEYCODE_BACK E al.Visible Poi
ActionListModule.Hide (al)
Ritorno Vero
End If
End Sub
'Questo sub viene generato quando l'utente preme su un elemento
'ReturnValue è il valore assegnato alla voce selezionata
Sub ActionList_Result (ReturnValue As Object)
Log (ReturnValue)
ToastMessageShow ("ReturnValue =" & ReturnValue, True)
End Sub
Sub btnShow_Click
ActionListModule.Show (al, Attività, 10dip, 10dip)
End Sub
Sub btnHide_Click
ActionListModule.Hide (al)
End Sub
[/ Code]
Nel modulo attività si dovrebbe avere ActionList variabile globale.
La riga seguente crea un nuovo ActionList e lo assegna alla variabile:
[Code]
al = ActionListModule.InitializeList (150dip, "Scegli azione", "Main")
[/ Code]
I parametri sono: larghezza, il titolo e il nome del modulo attività (necessaria per generare l'evento Risultato).
L'aggiunta di elementi viene fatto chiamando:
[Code]
ActionListModule.AddActionItem ("# articolo 5" al,, LoadBitmap (File.DirAssets, "wrench_orange.png"), 5)
[/ Code]
I parametri sono: variabile ActionList, una nota di testo, immagine articolo (o nullo) e il valore che verrà restituito quando l'utente fa clic su questo elemento.
Questo modulo richiede la libreria Animation (il menu svanisce in e out) e la biblioteca di riflessione (per l'immagine nove patch).
Come spiegato nel tutorial nove patch, l'immagine nove-patch si trova negli oggetti \ res \ drawable e deve essere di sola lettura.
Il codice è anche un buon esempio per la creazione di una visualizzazione personalizzata con un modulo di codice.
[B]Credits[/B]
Immagine di sfondo: [URL='http://android9patch.blogspot.com/']Android 9 cerotto[/URL]
Icone Esempio: [URL='http://famfamfam.com/lab/icons/silk/']famfamfam.com: Silk Icons[/URL] [/ quote]
hello erel a question, and I would like to anda twolines listview bitmap, I've seen several guides but all incomprehensible, I do not understand the steps, considering that I'm learning from you, but I already have something long is the road had often find guides for people who are already advanced do not go well for me, how can I do to create this list? I am reading other guides also visual basic, but this language is a bit different, but there is not a guide to understand this language? thanks for everything ..
