Программирование Delphi

Устанавливаем на форму Combobox, добавляем пункты и извлекаем. Сообщения CB_ADDSTRING, CB_SETCURSEL, CB_GETLBTEXT, CBN_SELENDOK.

SendMessage(hCombo, CB_ADDSTRING, 0, "1 string");