Тема: Combobox (ItemIndex)
Показать сообщение отдельно
  #3  
Старый 07.08.2009, 22:13
Аватар для 0nni
0nni 0nni вне форума
Начинающий
  
Регистрация: 13.12.2008
Адрес: Туапсе
Сообщения: 161
Репутация: 20
По умолчанию
Код:
procedure TForm1.ComboBox1DropDown(Sender: TObject);
begin
  with ComboBox1 do
    Perform(CB_SETCURSEL, Perform(CB_GETCOUNT, 0, 0) - 1, 0);
end;
Но зачем?
__________________
...сказал, и загрустил от бесспорной своей правоты
Ответить с цитированием