I have a listbox with multiple columns - one column has a date, another column a string. Is there a way to sort by date column and then sort by string column so that the date becomes the sub-sort? When I sort the listbox by date and then by string - it seems to lose the date order. I used to use …

i think you need this event Function CompareRows(row1 as Integer, row2 as Integer, column as Integer, ByRef result as Integer) Handles CompareRows as Boolean End Function and a compare method https://documentation.xojo.com/api/language/sort.html

I’m not sure if this will work for me. I use the CompareRows function to sort the date column. The problem arises after when I click the header to sort the string column. First I sort the listbox by date and I get something like this: 1/1/02 Jones, Mary 6/1/02 Smith, John 1/1/03 Jones, Mary 6/1…

Sorting on multiple columns is pretty tricky. If it were me, I’d set up an in-memory SQLite database and keep all the rows of data there. Then use SQLIte’s sorting to get the RowSet and repopulate the listbox.

[image] David_Schlam: Is there a way to sort by date column and then sort by string column so that the date becomes the sub-sor is that not the same as you put both together. date+str <=> date+string the sort just need -1,0,1

How do you populate your ListBox ? From a Data Base ? If so, maybe you can sort the DataBase directly at read time…

CompareRows(row1 as Integer, row2 as Integer, column as Integer, ByRef result as Integer) if column = dateindex my idea was read date+next column from row1 read date+next column from row2 =CellValueAt(row1,column) =CellValueAt(row1,column+1) =CellValueAt(row2,column) =CellValueAt(row2,colu…

Something like this should work, but untested Function CompareRows(row1 as Integer, row2 as Integer, column as Integer, ByRef result as Integer) Handles CompareRows as Boolean Select Case column Case 0 ' Date Column If me.CellTagAt(row1, column) > me.CellTagAt(row2, column) Then Retur…

[image] Wayne_Golding: but untested i guess this byref result is the return value :wink: Return True if the returned Result parameter is accurate for sorting. Return False if you want the Listbox to use the default lexicographic sorting of the column.

And that’s what you get for coding here :slight_smile:

Except return x should be result = x Ooops - you beat me to it :laughing:

Xojo Programming Forum

Sorting a Listbox

General

MarkusR (MarkusR) April 18, 2021, 12:10pm 15

except CompareRows