powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Простой вопрос по Listiew.
5 сообщений из 5, страница 1 из 1
Простой вопрос по Listiew.
    #34796524
Daena
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как скрыть определенный ListItems? Или как можно сделать, что-то наподобие фильтра, если у кого есть код, поделитесь плиз.
...
Рейтинг: 0 / 0
Простой вопрос по Listiew.
    #34797333
Daena
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да это нереально, понимаю, фильтрация выглядит кошмарно :-) Почему, ListView такой тормоз? Как можно убыстрить процесс? Знает кто-нибудь или нет?
...
Рейтинг: 0 / 0
Простой вопрос по Listiew.
    #34797405
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сделайте невидимый listview и в него перемещайте элементы не удовлетворяющие условию фильтрации. А зачем вообще это надо ?
...
Рейтинг: 0 / 0
Простой вопрос по Listiew.
    #34797434
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
На быструю руку, что нашел в своих пректах, может поможет....

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
For i =  1  To  20000 
rtn = m.Do("rlist^%gvED")
If rtn = "" Then 
 MEdit.MousePointer = vbDefault
 Exit Sub
 End If
m.Xecute ("s rtn=""" & Piece(rtn, "  ",  1 ) & """")
Set itmX = ListView1.ListItems.Add(, , "" & Piece(rtn, "  ",  1 ) & "", ,  1 )
itmX.SubItems( 1 ) = Piece(rtn, "  ",  2 )

    Next i
    MEdit.Caption = i & " - Routines Load ..."
...
Рейтинг: 0 / 0
Простой вопрос по Listiew.
    #34798251
Daena
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ValeriuНа быструю руку, что нашел в своих пректах, может поможет....

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
For i =  1  To  20000 
rtn = m.Do("rlist^%gvED")
If rtn = "" Then 
 MEdit.MousePointer = vbDefault
 Exit Sub
 End If
m.Xecute ("s rtn=""" & Piece(rtn, "  ",  1 ) & """")
Set itmX = ListView1.ListItems.Add(, , "" & Piece(rtn, "  ",  1 ) & "", ,  1 )
itmX.SubItems( 1 ) = Piece(rtn, "  ",  2 )

    Next i
    MEdit.Caption = i & " - Routines Load ..."


Что то ничего не понятно.
Код: plaintext
rtn = m.Do("rlist^%gvED")
- Это что?

А нужно мне это, чтобы отфильтровывать улицы в справочнике, а так как улицы имеют одинаковые названия и при этом у них могут быть разные индексы, для наглядности нужно применять кучу фильтров. Сперва допустим просто из строки поиска вводим "таганская", вываливаются "таганская ул." и "таганская пл.", а потом устанавливаем фильтр на конкретную улицу, чтобы осталась она одна. Вот. Может использовать другой эл. управления?
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Простой вопрос по Listiew.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]