выпадающий список ComboBox

[pu4koff]

Товарищи. Как указать высоту выпадающего списка ComboBox? Создаю я ComboBox, заполняю, список выпадает, но высотой в 1 пиксель наверно

[mihali4]

Вы динамически создаете?
Явно укажите свойства:
Style
DropDownCount
И еще. А его никакой другой компонент не закрывает?
Сделайте еще на всякий случай BringToFront.

[rpy3uH]

Сообщение от pu4koff

Создаю я ComboBox, заполняю, список выпадает, но высотой в 1 пиксель наверно

а как ты его создаёшь?

[Kostia]

Создаю я ComboBox:

Box:=CreateWindow('COMBOBOX', '',
                       BS_CHECKBOX or WS_VISIBLE or WS_CHILD or SS_LEFT, 
                       8, 130, 220, 16, pWnd, BOX_1, hInstance, nil);

1. Как запретить ввод?
2. Как добавить новый пункт?
3. Как потом узнать какой пункт выбран и что там написано?

Создаю я Edit:

Edit := CreateWindowEx( WS_EX_STATICEDGE, 'Edit', 'Edit',
                                  WS_VISIBLE or WS_CHILD,
                                 10, 10, 220, 20, pWnd, EDT_1, hInstance, nil );

Как узнать введенный текст в edit'е и как его поменять?

Спасибо!

[Dark_Elf]

Что бы узнать что написано есть функцию getwindowtext параметры в справке вин апи.

Setwindowtext что бы записать

[rpy3uH]

1. надо ставить стиль при создании CBS_DROPDOWNLIST
2. сообщение CB_ADDSTRING - добавление строки.
3. сообщение CB_GETCURSEL - получение индекса выбранного элемента, CB_GETLBTEXT получение текста по индексу

Kostia, в общем читай справку по WIN API или MSDN

[Kostia]

Создаю я ComboBox, заполняю, список выпадает, но высотой в 1 пиксель

У меня тоже само получается, но как это исправит не знаю, подскажите пожалуйста.

[rpy3uH]

попробуй сообщение CB_SETITEMHEIGHT

[Kostia]

Сообщение от rpy3uH

попробуй сообщение CB_SETITEMHEIGHT

Это я пробовал, не помогло.

Посмотри на мои старания: http://www.develprog.ucoz.ru/Arkanoid.rar(176 kb)

[rpy3uH]

решение проблемы

Box:=CreateWindow('COMBOBOX', '',  
                       BS_CHECKBOX or WS_VISIBLE or WS_CHILD or SS_LEFT,   
                       8, 130, 220,
                       200, //<- здесь надо указать максимальную высоту
                                      // выпадающего списка+строка выбора
                       pWnd, BOX_1, hInstance, nil);