A heavy-duty sort
Posted: 9 May 2006 10:44
This is the code snippet that I displayed on the screen in Faro.
It is a trick to use Microsoft's sort which seems to perform well
even under extreme conditions.
Chan Bok
Axon Research
It is a trick to use Microsoft's sort which seems to perform well
even under extreme conditions.
Code: Select all
listSort(In,Out):-!,
Ctl_Flags = [wsf_invisible,wsf_Sort],
SortWin = vpi::winCreateControl(wc_LBox,rct(0,0,100,100),"",
vpi::getTaskWindow(),Ctl_Flags,999),
vpi::lboxAdd(SortWin,In),
Out = vpi::lboxGetAll(SortWin),
vpi::winDestroy(SortWin). Chan Bok
Axon Research