Списки выбора хранят в себе какие-то списки (например, параметров) и дают пользователям возможность выбирать из них один или несколько параметров.

Чтобы получить доступ к строкам списка, нужно воспользоваться свойством items объекта TListBox. Это свойство имеет тип TStrings. Это ничего вам не на­поминает? Такой же тип у свойства Lines класса тмето. Значит, работа со строками списка нам уже известна и не вызовет затруднений, потому что все, что мы говори­ли про эти методы и свойства Lines класса тмето, так же относится и к свойству Items объекта TListBox.

Давайте напишем маленькое приложение с использованием этого компонента. Создайте новый проект. Установите на форме один компонент TListBox и один компонент TEdit. Теперь дважды щелкните по свойству items компонента ListBoxi, и перед вами откроется уже знакомый редактор строк. Наберем в нем названия всех основных цветов: 

• белый;                    
• черный;                       
• оранжевый;                
• фиолетовый;              
• бирюзовый;

Если идти по порядку, то сейчас должен был быть компонент TRadioBox. Но мы перескочим сразу на TPanel. Это сделано потому, что она будет использоваться уже в следующих примерах.

TPanel — это компонент в виде панели. Он ведет себя почти так же, как форма, и между ними есть что-то общее. Вы можете на нем располагать компоненты, и если вы передвинете панель, то все компоненты, установленные на ней, тоже пе­редвинутся.

Панель может выглядеть по-разному. За внешний вид отвечают два свойства: Bevel inner и Beveiouter. Рассмотрим маленькую программу, которая ничего не делает, зато она показывает, как может выглядеть панель с различными вариантами установленных параметров. На панели шрифтом выделены установленные значе­ния Bevel Inner И BevelOuter

Теперь перейдем к рассмотрению компонента CheckBox. Как всегда, давайте создадим маленькую программу, которая будет использовать этот компонент.

Создайте новое приложение, поместите на главную форму одну кнопку и два компонента TCheckBox. Первому компоненту дадим заголовок (свойство caption) "Разрешить закрытие программы" и имя (свойство Name) AiiowdoseCheckBox. Вто­рому компоненту дадим заголовок (caption) "Отключить кнопку" и имя (Name) EnableButtonCheckBox.

Кнопке дадим ИМЯ MyFirstButton.

Создайте обработчик события onclick ДЛЯ компонента EnableButtonCheckBox (это второй CheckBox). В нем напишем следующее:

Здесь свойству Enabled нашей кнопки присваивается значение not EnableButtonCheckBox.Checked. Что ЭТО значит? СВОЙСТВО Checked компонента EnabieButtonCheckBox показывает, стоит ли флажок на этом компоненте checkBox. Если да, то свойство checked будет равно True, иначе False. Оператор not меняет булево значение на противоположное. Это значит, что если свойство checked было равно True, то в MyFirstButton.Enabled будет присвоено противоположное (False).

Можете попробовать запустить пример и посмотреть, что происходит. Когда вы ставите флажок против компонента с надписью "Отключить кнопку", свойство checked этого компонента меняется на True. Срабатывает событие onclick и в свойство Enabled кнопки присваивается значение свойства checked компонента CheckBox, измененное на противоположное, т. е. False. А когда свойство Enabled кнопки равно False, она становится недоступной.

Чтобы окончательно разобраться с работой примера, нажмите на EnabieButtonCheckBox при запущенной программе. Потом попробуйте убрать из исходного кода оператор not и снова запустите программу.

Теперь давайте создадим обработчик onclick для кнопки. В нем напишите сле­дующий код:

Здесь проверяется, если свойство checked компонента AiiowdoseCheckBox (первый checkBox на форме) равно True, то закрыть программу (вызвать метод close). Иначе ничего не произойдет. Снова запустите пример и попробуйте выйти из программы с помощью установленной кнопки.

Как видите, работа этого компонента очень проста.

Теперь мы познакомимся с многострочными компонентами ввода. Для этого на вкладке Standard есть компонент TMemo. Как всегда, в качестве примера напишем не­большую программу. Создайте новый проект и установите на форму компонент TMеmо.

По умолчанию в нем уже присутствует одна строка текста, равная имени компо­нента. За содержимое текста отвечает свойство Lines. Это свойство — целый объ­ект типа Tstrings, и имеет свои свойства и методы. Немного позже мы познако­мимся с некоторыми из них.

Давайте сначала просто очистим содержимое компонента Memo1. Для этого два­жды щелкните по свойству Lines. Перед вами откроется окно редактора строк (рис. 7.6). Это окно содержит простой текстовый редактор, в котором можно на­брать многострочный текст. Мы не будем этого делать, а просто удалим все его содержимое. Как только сделаете это, нажмите кнопку ОК.

Теперь давайте напишем небольшую программу, которая будет выполнять про­стые функции текстового редактора. Сложные вещи не получатся, потому что тмето — это простой компонент, да и еще рано делать что-то сложное. Для созда­ния более сложных текстовых редакторов есть другой компонент.

С помощью строк ввода мы постоянно будем получать от пользователя различ­ную информацию. Давайте попробуем написать несколько программ с использова­нием этого компонента, чтобы понять все тонкости работы с ним.

Создайте новый проект. Установите в окне формы два компонента TEdit и одну кнопку. У вас должно получиться нечто похожее на рис. 7.5.

Давайте очистим у обоих компонентов TEdit свойство Text. Это свойство отвечает за содержимое строки ввода. Мы просто очи­стим, чтобы после запуска программы обе строки ввода были пустыми.

Теперь создайте для кнопки обработчик события onclick. Мы это уже делали, поэто­му у вас не должно быть с этим проблем. Кстати, если дважды щелкнуть по кнопке или по компоненту на форме, то Delphi автоматически создаст этот обработчик со­бытия. Ну а если он уже создан, то просто перенесет вас в то место, где написан код этого обработчика.

Итак, создайте обработчик и напишите в нем: