Italian Gestiore + Layout

daniweb78

Member
Salve a tutti, saranno domande stupide, ma sono agli inizi.
La mia parte con un layout dove sono presenti 2 pulsanti e a sua volta devono aprire layout diversi che fanno determinate operazioni.
in questo momento quando clicco sul pulsante il layout principale resta sempre visibile, c'è modo di poter visualizzare solo il layout che mi serve ?

Scusatemi ancora...
Saluti
 

Star-Dust

Expert
Licensed User
Longtime User
Se il Layout principale ha un Panel di Base puoi renderlo invisibile, cosi tutte le viste dentro quel Panel.

Ad esempio se si chiamasse PanelMain, puoi scrivere PanelMai.Visible=false.
Poi per farlo riapparire PanelMain.Visible=True
 
Last edited:

Star-Dust

Expert
Licensed User
Longtime User
1f914.png
 

udg

Expert
Licensed User
Longtime User
Se desideri lavorare su un'unica pagina, alternando più layout, puoi far uso di RemoveAllViews prima di caricare il nuovo layout (che ovviamente avrà i tasti per caricare le restanti alternative). Se ti occorre preservare dei dati tra un layout e l'atro, ti tocca salvarli e ripristinarli quando richiami quel layout.

Con il panel è più o meno lo stesso a meno di non avere più panel (ognuno per uno specifico layout) e, come detto sopra, procedere di mostra/nascondi in funzione delle scelte dell'utente.

La scelta vincente è comunque quella di orientarsi sulle B4xPages (tanto alla fine utilizzerai solo quelle). In tal caso ogni schermata/layout sarà una B4xPage che ha tutti i vantaggi di essere una classe a sé.
 

Sabotto

Well-Known Member
Licensed User
Giusto uno spunto (usando B4XPages) visto che sei proprio all'inizio
B4X:
' Dalla pagina principale (B4XMainPage), dove potresti mettere i due bottoni
' e supponendo che una delle pagine che devono svolgere la funzione richiesta si chiami pag1,
' che avrai creato con il menu Aggiungi nuovo modulo --> modulo di classe -- B4XPage,

Dim p1 as pag1

Private Sub B4XPage_Created (Root1 As B4XView)
   Root = Root1
   Root.LoadLayout("MainPage")
   
p1.Initialize
B4XPages.AddPage("id1",p1)
   
End Sub
  
Private Sub Button1_Click
   
    B4XPages.ShowPage("id1")

End Sub
 
Top