TComboBox.ReadOnly

Delphi , Компоненты и Классы , Списки

TComboBox.ReadOnly

Иногда хочется сделать так, чтобы в комбобоксе, пользователь мог только выбирать из списка но не вводить текст с клавиатуры.

Так можно включить "ComboBox.ReadOnly"

SendMessage(GetWindow(ComboBox1.Handle,GW_CHILD), EM_SETREADONLY, 1, 0);

а так выключить.

SendMessage(GetWindow(ComboBox1.Handle,GW_CHILD), EM_SETREADONLY, 0, 0);

При csDropDownList нельзя набирать для выбора, то есть если нажал "К" а потом "О", то вначале выберется слово на "К" а потом на "О", а так выберется слово на "КО", и текст нельзя из него копировать.

Автор: Fantasist

Взятый пост с форума Vingrad.ru!

Действительно, иногда вам нужно позволить пользователям выбрать элемент из комбобокса, но запретить им вводить свой текст. Это можно достичь установкой свойства ReadOnly комбобокса.

В Delphi это можно сделать с помощью свойства TComboBox.ReadOnly и установкой его в True. Однако, как упомянул Фантасист, есть еще другой способ достичь этого с помощью вызовов Windows API.

Приведенный код-набор устанавливает состояние только для чтения для дочернего окна комбобокса с помощью сообщения EM_SETREADONLY:

SendMessage(GetWindow(ComboBox1.Handle, GW_CHILD), EM_SETREADONLY, 1, 0);

Это отправляет сообщение EM_SETREADONLY в дочернее окно комбобокса (т.е., в редактируемый контрол) с значением 1, которое устанавливает состояние только для чтения.

Чтобы отменить это свойство и позволить пользователям вводить свой текст снова, можно отправить то же сообщение с значением 0:

SendMessage(GetWindow(ComboBox1.Handle, GW_CHILD), EM_SETREADONLY, 0, 0);

Относительно поведения списка выбора, Фантасист прав, что когда комбобокс имеет стиль csDropDownList и пользователь начинает вводить текст, функция автодополнения включается. Это означает, что если пользователь вводит "К" followed by "О", комбобокс выберет элемент, начинающийся с "КО", а не оставляет его на последнем выбранном элементе.

Это поведение является специфичным для стиля списка выбора и не может быть изменено с помощью свойства ReadOnly или вызовов Windows API в одиночку.

В целом, установка свойства ReadOnly комбобокса (или использование сообщения EM_SETREADONLY) позволяет пользователям выбирать элементы, но запрещает им вводить свой текст. Однако это не влияет на поведение автодополнения в комбобоксах с стилем списка выбора.

В статье описывается, как использовать свойство TComboBox.ReadOnly для ограничения возможности ввода текста в комбобоксе и обеспечения выборки только из предложенного списка.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Списки ::