Italian Resize a codice di una CLV

Fulvio75

Well-Known Member
Licensed User
A chi può interessare e se non già risaputo:

Per aumentare oppure diminuire l'altezza di una CustomListView da codice bisogna tenere presente che è divisa in due parti e vanno ingrandite oppure diminuite di grandezza entranbe altrimenti non si vedono tutti i dati

Es:

B4X:
'Abilita la visualizzazione a tutto schermo della CLW per visualizzare i dati
private Sub CLW_FullScreen(Enabled As Boolean)
    
    'CLW è divisa in due parti il contenitore dei dati sv e il pannello che contiene tutto AsView
    
    If Enabled = True Then
        clwResult.AsView.Height = ......
        clwResult.sv.Height = clwResult.AsView.Height 
    Else If Enabled = False Then
        clwResult.Asview.Height = .........
        clwResult.sv.Height = clwResult.Asview.Height
    End If

End Sub
 

Sabotto

Well-Known Member
Licensed User
Perchè c'è l'IF dell'enabled se poi le istruzioni sono identiche in entrambe i casi?
Forse perchè cambia l'height tra l'una e l'altra? Ma perchè dovrebbe influire la condzione enabled sul visualizzarla fullscreen o no?
 

Fulvio75

Well-Known Member
Licensed User
Perchè c'è l'IF dell'enabled se poi le istruzioni sono identiche in entrambe i casi?
Forse perchè cambia l'height tra l'una e l'altra? Ma perchè dovrebbe influire la condzione enabled sul visualizzarla fullscreen o no?
Perché nell'esempio utilizzo height diverso a seconda se visualizzo una barra di stato e un menù o meno, se guardi ho messo dei puntini e non il codice che varia a seconda della visualizzazione
 

Filippo

Expert
Licensed User
Longtime User
Anche se penso che questa procedura non serva, in questo modo è più sexi.

B4X:
'Abilita la visualizzazione a tutto schermo della CLW per visualizzare i dati
private Sub CLW_FullScreen(Enabled As Boolean)
    
    'CLW è divisa in due parti il contenitore dei dati sv e il pannello che contiene tutto AsView
    
    If Enabled Then
        clwResult.AsView.Height = ......
    Else
        clwResult.Asview.Height = .........
    End If
    clwResult.sv.Height = clwResult.AsView.Height

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