GridView.Sorted (gb.qt4)
Property Sorted As Boolean
Dal 3.1
Restituisce o imposta se facendo clic sull'intestazione di una colonna si attiva / disattiva l'indicatore di ordinamento.
L'ordinamento dei dati non viene eseguito automaticamente. Deve essere fatto attraverso il codice dell'utente.
Di seguito è riportato un esempio di come l'ordinamento potrebbe essere realizzato all'interno dell'evento GridView
Sort.
Esempio
Public Sub GridView1_Sort()
Dim Values, ValueSorted As New String[]
Dim Nx, iNx As Integer
' Carica la colonna di ordinamento in un array di stringhe
For Nx = 0 To GridView1.Rows.Max
Values.Add(GridView1[Nx, GridView1.Columns.Sort].Text)
Next
' Copia i valori nel nuovo array e li ordina in base all'ordinamento
ValueSorted = Values.Copy()
ValueSorted.Sort(IIf(GridView1.Columns.Ascending, gb.Ascent, gb.Descent))
' Scorre la tabella scambiando con swap i valori appropriati
For Nx = 0 To ValueSorted.Max
For iNx = 0 To GridView1.Columns.Max
Swap GridView1[Nx, iNx].Text, GridView1[Values.Find(ValueSorted[Nx], 0, Nx), iNx].Text
Next
' Importa il nuovo ordine e aggiorna
Values.Clear()
For iNx = 0 To GridView1.Rows.Max
Values.Add(GridView1[iNx, GridView1.Columns.Sort].Text)
Next
Next
GridView1.Refresh()
End
Quanto sopra può essere applicato anche a
TableView.