Как сортировать SmRecordList?

Программирование для SmarTeam.

Как сортировать SmRecordList?

Сообщение Linc » 14 окт 2010 10:45

ДОброго времени суток! Друзья :HELP: , подскажите пожалуйста, как сделать сортировку набора данных типа SmRecordList по возрастанию или по убыванию?
Т.е. у меня есть набор записей, которые я получаю поиском по разным критериям, знаю что есть метод Sort у SmRecordList'a но не могу понять как он работает.. буду признателен если кто подскажет!
Linc
Новичок
Новичок
 
Сообщения: 15
Зарегистрирован: 16 апр 2010 05:04

Re: Как сортировать SmRecordList?

Сообщение Геройчиковый » 10 ноя 2010 18:09

Код: Выделить всё
Dim RL As Object
Dim SortQuery As Object

Set RL = CreateObject("SmRecList.SmRecordList")
RL.AddHeader "Column1", 256, sdtChar
RL.AddHeader "Column2", 256, sdtChar

Set SortQuery = CreateObject("SmRecList.SmRecordList")
SortQuery.AddHeader "COL_NAME", 256, sdtChar
SortQuery.AddHeader "TDM_DIRECTION", 4, sdtBoolean
SortQuery.ValueAsBoolean("TDM_DIRECTION", 0) = True   'сортировка по возрастанию (false - по убыванию)

SortQuery.Value("COL_NAME", 0) = "Column1"      ' Сортируем RL, по столбцу Column1
RL.Sort SortQuery, 1, 0
Будь у героев время подумать - героизма не было бы вовсе...
Все люди, занятые истинно важным делом, всегда просты, потому что не имеют времени придумывать лишнее. (Лев Николаевич Толстой)
Делай, что можешь, с тем, что имеешь, там, где ты есть. (Теодор Рузвельт)
Аватара пользователя
Геройчиковый
Участник
Участник
 
Сообщения: 170
Зарегистрирован: 25 сен 2007 08:52
Откуда: Балашиха


Вернуться в Программирование

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4