Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.13;
Скачать: 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 вся ветка

Текущий архив: 2005.03.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.049 c
14-1108742992
Doxygen
2005-02-18 19:09
2005.03.13
DocBook


3-1108117514
sashakamap
2005-02-11 13:25
2005.03.13
ADO MAX(....)


14-1109104216
Profi
2005-02-22 23:30
2005.03.13
Посвящается DOOM e


1-1109616668
Bloody-Wolf
2005-02-28 21:51
2005.03.13
Функция не работает, что в ней не так?


14-1109084511
Cosinus
2005-02-22 18:01
2005.03.13
Сталкивался кто-нибудь с "бинарными" шрифтами?