proceduraScopo
Abilita la lista dei campi di ordinamento del pannello, riordinando le righe secondo i criteri impostati.
Sintassi
Pannello.EnableSorting()
Argomenti
Questa procedura non ha argomenti.Esempio di codice
// ***************************
// Esegue il sort del pannello
// ***************************
public void Fornitori.BottoneSort()
{
// Cancello il sort precedente
Fornitori.ResetSortList()
//
// Seleziono i campi per cui è stato chiesto l'ordinamento
for each row
{
select
SequenzaSortCampo := SequenzaSort
NumeroCampo := Numero
TipoSortCampo := TipoSort
from
CampiPannello // Master Table
where
SequenzaSort > ZERO
order by
SequenzaSort
//
record Campo
int SequenzaSort //
int Numero //
string TipoSort //
//
// Aggiungo alla lista di sorting
Fornitori.AddToSortList(Campo.Numero, Campo.TipoSort <> D)
}
//
// Abilito il sort
Fornitori.EnableSorting()
//
// Scrivo nel pannello la lista di ordinamento
CampiPannello.SortString.Caption := Fornitori.SortingList
}
// Esegue il sort del pannello
// ***************************
public void Fornitori.BottoneSort()
{
// Cancello il sort precedente
Fornitori.ResetSortList()
//
// Seleziono i campi per cui è stato chiesto l'ordinamento
for each row
{
select
SequenzaSortCampo := SequenzaSort
NumeroCampo := Numero
TipoSortCampo := TipoSort
from
CampiPannello // Master Table
where
SequenzaSort > ZERO
order by
SequenzaSort
//
record Campo
int SequenzaSort //
int Numero //
string TipoSort //
//
// Aggiungo alla lista di sorting
Fornitori.AddToSortList(Campo.Numero, Campo.TipoSort <> D)
}
//
// Abilito il sort
Fornitori.EnableSorting()
//
// Scrivo nel pannello la lista di ordinamento
CampiPannello.SortString.Caption := Fornitori.SortingList
}