ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по API: SendMessageByString
4 сообщений из 4, страница 1 из 1
Вопрос по API: SendMessageByString
    #37781144
DUDALS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DUDALS
Участник
На форме имеется элементы txtFiltr(Текстбох) и lstFiltr (Листбох с загруженными в него данными)
При вводе символов в текстовое поле txtFiltr, API функцией SendMessageByString ищется похожие данные в lstFiltr.
Почему при свойстве lstFiltr.Style = 0 функция SendMessageByString работает, а при lstFiltr.Style = 1 нет
Как можно это обойти?
Код: vbnet
1.
2.
3.
4.
5.
6.
Private Sub txtFiltr_Change()
    Dim entryNum As Long
    Dim txtToFind As String
    txtToFind = Me.txtFiltr.Text
    entryNum = SendMessageByString(Me.lstFiltr.hwnd, LB_SELECTSTRING, 0, & txtToFind)
End Sub
...
Рейтинг: 0 / 0
03.05.2012, 19:13
| Ответить | Цитировать | Написать  
Вопрос по API: SendMessageByString
    #37781223
Забраковываю эту тему
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Забраковываю эту тему
Гость
DUDALSНа форме имеется элементы txtFiltr(Текстбох) и lstFiltr (Листбох с загруженными в него данными)
При вводе символов в текстовое поле txtFiltr, API функцией SendMessageByString ищется похожие данные в lstFiltr.
Почему при свойстве lstFiltr.Style = 0 функция SendMessageByString работает, а при lstFiltr.Style = 1 нет
Как можно это обойти?
Код: vbnet
1.
2.
3.
4.
5.
6.
Private Sub txtFiltr_Change()
    Dim entryNum As Long
    Dim txtToFind As String
    txtToFind = Me.txtFiltr.Text
    entryNum = SendMessageByString(Me.lstFiltr.hwnd, LB_SELECTSTRING, 0, & txtToFind)
End Sub


SendMessageByString(Me.lstFiltr.hwnd, LB_SELECTSTRING, 0, & txtToFind )
что это?
...
Рейтинг: 0 / 0
03.05.2012, 21:08
| Ответить | Цитировать | Написать  
Вопрос по API: SendMessageByString
    #37781688
DUDALS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DUDALS
Участник
Сорри. В коде нет "&"
...
Рейтинг: 0 / 0
04.05.2012, 11:01
| Ответить | Цитировать | Написать  
Вопрос по API: SendMessageByString
    #37781861
DUDALS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DUDALS
Участник
Разобрался. Параметр LB_SELECTSTRING заменил на LB_FINDSTRING с выделением найденной строки
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Private Sub txtFiltr_Change()
    Dim entryNum As Long
    Dim txtToFind As String
    txtToFind = Me.txtFiltr.Text
    entryNum = SendMessageByString(Me.lstFiltr.hwnd, LB_FINDSTRING, 0, txtToFind)
    Me.lstFiltr.ListIndex = entryNum
End Sub


Тема снята
...
Рейтинг: 0 / 0
04.05.2012, 12:16
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по API: SendMessageByString
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=79&tid=2157820]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 27ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 43ms
get tp. blocked users:
 2ms
others: 12ms
total:  130ms
созд. / загр.: 130ms
x
x
Закрыть


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