Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 20.09.2012, 10:35
leklerk leklerk вне форума
Прохожий
 
Регистрация: 27.05.2012
Сообщения: 6
Репутация: 10
По умолчанию Урезанный комбобокс

Добрый день! Подскажите пожалуйста, можно ли сделать комбобокс, который, пока по нему не щелкнули, внешне представляет собой только маленькую стрелочку (не знаю, как точнее назвать) без поля для ввода, но когда по нему щелкаешь значения показываются целиком.
Ответить с цитированием
  #2  
Старый 20.09.2012, 10:57
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

в FormCreate задать ему ширину:
Код:
  ComboBox1.Width:=GetSystemMetrics(SM_CXHTHUMB)+
    GetSystemMetrics(SM_CYFIXEDFRAME)*2;
в его событии ComboBox1DropDown:
Код:
  ComboBox1.Width:=145;
в событии ComboBox1CloseUp опять:
Код:
  ComboBox1.Width:=GetSystemMetrics(SM_CXHTHUMB)+
    GetSystemMetrics(SM_CYFIXEDFRAME)*2;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
leklerk (20.09.2012)
  #3  
Старый 20.09.2012, 11:15
leklerk leklerk вне форума
Прохожий
 
Регистрация: 27.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

Большое спасибо!
P.S. А можно сделать так, чтобы сам комбобокс всегда оставался "стрелочкой"?

Последний раз редактировалось leklerk, 20.09.2012 в 11:42.
Ответить с цитированием
  #4  
Старый 20.09.2012, 12:45
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от leklerk
Большое спасибо!
P.S. А можно сделать так, чтобы сам комбобокс всегда оставался "стрелочкой"?
Стандартный ComboBox не позволяет подобных вольностей.
Попробуй поэкспериментировать с нестандартными ComboBox'ами отсюда. Тем же и пример как создать свой ComboBox.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 23:52.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025