Проблема с ComboBox на WinApi

← →
Arnold © (2005-01-09 01:53) [0]

Создал на Api ComboBox но почему то больше 2х пунктов туда не влезает. Никак не пойму в чем дело.
Посылаю ему сообщени CB_ADDSTRING. Может стиль какой то надо поставить.
Спасибо

← →
Yanis © (2005-01-09 02:17) [1]

А код где?

← →
Arnold © (2005-01-09 10:19) [2]

Ну например вот так

lComboBox:=CreateWindowEx(cs_vredraw,"ComboBox","",ws_child or ws_visible or CBS_DROPDOWNLIST, 10, 20, 50, 70, hParent, 0, hInstance, nil);

for I:=0 to DriveList.COunt-1 do
SendMessage(lComboBox,CB_ADDSTRING,0,Dword(Pchar(DriveList[I])));

Пробовал стили менять не получается

← →
GanibalLector © (2005-01-09 13:55) [3]

var H2: HWND; begin H2 := CreateWindow("Combobox", "CB1", WS_VISIBLE or WS_BORDER or WS_CHILD or CBS_DROPDOWN or CBS_HASSTRINGS, 5, 5, 90, 100, Handle, 0, HInstance, nil); SendMessage(H2, CB_ADDSTRING, 0, Integer(PChar("Line1"))); SendMessage(H2, CB_ADDSTRING, 0, Integer(PChar("Line2"))); SendMessage(H2, CB_ADDSTRING, 0, Integer(PChar("Line3"))); SendMessage(H2, CB_ADDSTRING, 0, Integer(PChar("Line4"))); SendMessage(H2, CB_SETCURSEL, 2, 0); end;

← →
Игорь Шевченко © (2005-01-10 12:07) [4]

> Создал на Api ComboBox но почему то больше 2х пунктов туда
> не влезает

При создании надо указывать размер (высоту) с учетом выпадающего списка.

>Может стиль какой то надо поставить
Не помешает добавить WS_VSCROLL

← →
Георгий Бедный (2005-01-30 17:18) [6]

А как задать на ВинАпи диалог выбора шрифта и цвета фона (надо для скринсейвера)?

Проблема с ComboBox на WinApi Найти похожие ветки