Information générale
Catégorie:
Gestionnaire d'écran & Écrans
That's an interesting way of doing it...
Thanks,
-Michelle
>Michelle,
>I got what you're trying to do,
>I have a simple code I always use for a list that can change sort order
>
>list1.rowsourcetype=0-none
>
>
>PROCEDURE list1.add_data (UD method)
>PARAMETER nSort
>RELEASE myarray
>THIS.CLEAR
>DO CASE
> CASE nSort=1
> Select * from mytable into array myarray order by 1
> CASE nSort=2
> Select * from mytable into array myarray order by 2
> CASE nSort=3
> Select * from mytable into array myarray order by 3
>ENDCASE
>
>FOR i=1 TO _TALLY
> for j=1 TO ALEN('myarray',2)
> THIS.ADDLISTITEM(myarray(i,j),i,j)
> ENDFOR
>ENDFOR
>
>ENDPROC
>
>So all you have to do is passing parameter to list1.add_data and change the order on the list.
>Hope this simple code can help.
>(I've already frustated with my sloooooowwwww ISP)
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement