Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
'These variables can only be accessed from this module.
Private Dialog As B4XDialog
Private XUI As XUI
Private Causali_Fermo As B4XListTemplate
Private Base As B4XView
Private BtnSHOW As
End sub
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("lay_01")
Base = Activity
Dialog.Initialize (Base)
Dialog.Title = "CAPTION della DIALOG"
End Sub
sub btnSHOW_click
Causali_Fermo.Initialize
Causali_Fermo.mBase.Height = 500dip
Causali_Fermo.mBase.Width = 80%x
Causali_Fermo.CustomListView1.AsView.Color = Colors.Cyan
Causali_Fermo.CustomListView1.DesignerLabel.Width = 100%x
Causali_Fermo.CustomListView1.AsView.Width = 100%x
Causali_Fermo.mBase.Color = Colors.White
Causali_Fermo.Options = Array("Opzione 1", "Opzione 2", "Opzione 3", "Opzione 4")
Causali_Fermo.AllowMultiSelection = False
Dialog.Title = $"Indicare la motivazione del Fermo Fase"$
Wait For (Dialog.ShowTemplate(Causali_Fermo, "OK", "", "CANCEL")) Complete (Result As Int)
End Sub