Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Power Basic

Страница: 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-сайт: basicproduction.nm.ru
 Профиль | | #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_GETLBTEXT As Long = &H148
Const CB_GETLBTEXTLEN As Long = &H149


Используются, скорее всего, как и при работе с ЛистБоксом

Ответить

Номер ответа: 7
Автор ответа:
 alex



Вопросов: 84
Ответов: 453
 Профиль | | #7 Добавлено: 01.04.05 10:28
Вот пример, получения текста из COMBOBOX`а

#Include "win32api.inc"
 
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"
   ;Dialog 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
   ;Dialog 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) А кодом не люблю разбрасываться

Твой код ни для кого здесь ни малейшей ценности не представляет.
В чем ошибка была - так и не разобрался, значит ещё не раз наступишь на эти грабли :)))

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам