Страница: 1 |
Страница: 1 |
Вопрос: COMBOBOX
Добавлено: 31.03.05 12:50
Автор вопроса: D_E_N_I_S_K_A
Короче, создаю комбобокс:
CONTROL ADD COMBOBOX, menudlg, %listswitch, texе(), 0, 10,100,100,%CBS_DROPDOWNLIST
Отоброжает всё нормально и как мне надо (только выбор, своё не впишешь). Толко как получить данные оттуда
COMBOBOX GET TEXT menudlg,%listswitch TO a
CONTROL GET TEXT menudlg,%listswitch TO a
Не помогает. Отладчиком узнаю что значение 'а' не меняется. :[
Ответы
Всего ответов: 9
Номер ответа: 1
Автор ответа:
alex
Вопросов: 84
Ответов: 453
Профиль | | #1
Добавлено: 31.03.05 13:34
Надо выкладывать программный код, а так тебе никто помочь не сможет.
Проблема не ясна...
Номер ответа: 2
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #2
Добавлено: 31.03.05 14:01
Да, ошибка может быть где угодно, alex прав.
Номер ответа: 3
Автор ответа:
D_E_N_I_S_K_A
Вопросов: 2
Ответов: 3
Профиль | | #3
Добавлено: 31.03.05 22:01
Вопрос в том, как получить состояние комбобокса. CONTROL GET TEXT
..и..
COMBOBOX GET TEXT
...Не помогает
Альтернативы?
Номер ответа: 4
Автор ответа:
cresta
Вопросов: 117
Ответов: 1538
Профиль | | #4
Добавлено: 31.03.05 23:27
Что за "а" такое у тебя? Просили же код показать. Или он засекречен?
А альтернатива есть всегда:
Приходит молодой еврей к отцу и спрашивает:
-Папа, что такое альтернатива?
Отец: -Представь себе, что ты занялся разведением кур.
Сын: - Ну, представил.
Отец: -Представь, что у тебя их очень много.
Сын: -Представил.
Отец: -А теперь представь, что наступил
всемирный потоп, и все твои куры утонули.
Сын: -Ну, представил.
А где тут альтернатива?
Отец: -Альтернатива - утки.
Так что альтернатива - утки.(т.е. VB6)
Номер ответа: 5
Автор ответа:
ZagZag
ICQ: 295002202
Вопросов: 87
Ответов: 1684
Профиль | | #5
Добавлено: 01.04.05 02:48
Блин, вы издеваетесь наверное над человеком. Значение CHECKBOX -
Включен/Выключен (как я понял )
Const BM_GETCHECK As Long = &HF0&
Const BM_SETCHECK As Long = &HF1&
SendMessage hCheckBox,BM_GETCHECK,0,0
PS
Пишу код приблизительно
Номер ответа: 6
Автор ответа:
ZagZag
ICQ: 295002202
Вопросов: 87
Ответов: 1684
Профиль | | #6
Добавлено: 01.04.05 02:58
Простите за тупость смороженную мной выше
Я за двое суток 3 часа попал...
Вобщем с комбобоксом тоже через SendMessage работать прийдется, наверное
По моим догадкам это константы
Const CB_GETLBTEXTLEN As Long = &H149
Используются, скорее всего, как и при работе с ЛистБоксом
Номер ответа: 7
Автор ответа:
alex
Вопросов: 84
Ответов: 453
Профиль | | #7
Добавлено: 01.04.05 10:28
Вот пример, получения текста из COMBOBOX`а
CallBack Function OkButton
Local txt As String
ComboBox Get Text CbHndl, 1 To txt
MsgBox txt
ExitProcess(0)
End Function
Function PBMain As Long
Local DlgHandle As Long
Dim CBChoice(1 To 3) As String
CBChoice(1) = "aaaaaa"
CBChoice(2) = "bbbbb"
CBChoice(3) = "cccc"
 ialog New %HWND_DESKTOP, "Combo",,, 200, 100 To DlgHandle
Control Add ComboBox, DlgHandle, 1, CBChoice(), 2, 5, 196, 53, %CBS_DROPDOWNLIST
Control Add Button, DlgHandle, 3, "Ok", 75, 76, 30, 15, %BS_DEFAULT Call OkButton
ComboBox Select DlgHandle, 1, 1
 ialog Show Modal DlgHandle
End Function
Тебе это было нужно?
Номер ответа: 8
Автор ответа:
D_E_N_I_S_K_A
Вопросов: 2
Ответов: 3
Профиль | | #8
Добавлено: 01.04.05 15:36
Спасибо, стёр часть кода нафиг и переписал. Заработало 8) А кодом не люблю разбрасываться
Номер ответа: 9
Автор ответа:
cresta
Вопросов: 117
Ответов: 1538
Профиль | | #9
Добавлено: 01.04.05 17:17
стёр часть кода нафиг и переписал. Заработало 8) А кодом не люблю разбрасываться
Твой код ни для кого здесь ни малейшей ценности не представляет.
В чем ошибка была - так и не разобрался, значит ещё не раз наступишь на эти грабли ))