Скачать: CL | DM;

Проблема с 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х пунктов туда
> не влезает


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

---

← →
ALS ©   (2005-01-10 13:25) [5]

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

---

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c