| Вопрос: Выпадающий список / ComboBox | Добавлено: 20.01.04 17:55 |
Автор вопроса:  mc-black | Web-сайт: mc-black.narod.ru/dzp.htm | ICQ: 308-534-060 |
|
Как программно в VB6 раскрыть (и скрыть) выпадающий список (ComboBox), чтобы было так, как будто пользователь щелкнул на кнопку со стрелкой вниз? Я хочу использовать это вместе с поиском по списку, чтобы было примерно как VB6 IDE при нажатии на Ctl+J, только не на (Rich)текстбоксе, а просто в Combo. |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа: Justas   ICQ: 259418212 Вопросов: 24 Ответов: 325 |
Web-сайт: Профиль | | #1 | Добавлено: 21.01.04 01:28 |
|
Может тебе не то надо, но всё-же: Если у тебя выделен комбобокс, то ты можешь нажать {ALT + (стрелка вниз)} и у тебя раскроется комбобокс. Может послать эту комбинатцию СендКеем? |
||
|
Номер ответа: 2 Автор ответа:  LamerOnLine ICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #2 | Добавлено: 21.01.04 09:22 |
|
Посмотри на http://www.sources.ru/vb_controls.shtml#2 К примеру: Как программно развернуть Combo Box Добавьте combo box с именем cboCombo, и кнопку cmdDrop. Если Вам понадобится закрыть обратно выпадающий список, то просто вызовите API функцию SendMessage с CB_SHOWDROPDOWN и False вместо True. Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Const CB_SHOWDROPDOWN = &H14F 'WM_USER + 14 Private Sub cmdDrop_Click() SendMessage cboDrop.hwnd, CB_SHOWDROPDOWN, True, 0 End Sub |
||
|
Номер ответа: 3 Автор ответа: mc-blackICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #3 | Добавлено: 21.01.04 13:18 |
|
2All: Спасибо, это именно то, что надо! |
||
Страница: 1 |