ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 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):
x
x
Закрыть


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