mirror of
https://github.com/KeymonSoft/Mariana.git
synced 2026-04-20 14:19:21 +00:00
- VERSION 4.07.16
- Se agregó el codigo de promociones segmentadas a "Subs.traePromo". - Se cambió el tamaño de las etiquetas de "lv_promos" para que no se amontone el texto. - Se cambió el tamaño y posicion de "lv_promos" para que quede mas centrado.
This commit is contained in:
@@ -223,13 +223,13 @@ Sub lv_catalogos_ItemClick (Position As Int, Value As Object)
|
||||
lfila.text = "PROMOCIONES"
|
||||
lv_catalogos.Visible = False
|
||||
lv_promos.Clear
|
||||
lv_promos.TwoLinesLayout.ItemHeight =80dip
|
||||
Dim label1 As Label
|
||||
Dim label1 As B4XView
|
||||
label1 = lv_promos.TwoLinesLayout.Label
|
||||
label1.Height = 50dip
|
||||
label1.TextSize = 15
|
||||
label1.TextColor = Colors.Black
|
||||
label1.Gravity = 3
|
||||
label1.SetTextAlignment("CENTER", "LEFT")
|
||||
lv_promos.TwoLinesLayout.ItemHeight = 60dip
|
||||
label1.Height = 40dip
|
||||
Dim label2 As Label
|
||||
label2 = lv_promos.TwoLinesLayout.SecondLabel
|
||||
label2.Top = label1.Height
|
||||
|
||||
Reference in New Issue
Block a user