Контрольные вопросы

1. Создание формы. Основные свойства формы.

2. Компонент TLabel. Основные свойства.

3. Компонент TButton. Основные свойства.

4. Программирование кнопок.

5. Установка фокуса на компоненте.

6. Особенности вывода данных разного типа на форму.

Лабораторная работа № 14 Интерактивный ввод и вывод. Обработка исключительных ситуаций

Цель работы: изучение компонентов TEdit, TRadioButton и их основных свойств. Обработка исключительных ситуаций. Вывод диалоговых окон.

Теоретические сведения Компонент tEdit (поле редактирования)

Компонент Edit используют для ввода/вывода пользователем ряда символов с клавиатуры. Поле редактирования помещается на форму c помощью кнопки на стандартной панели инструментов. При необходимости преобразования полученной строки (свойствоText) в число и наоборот используют стандартные функции преобразования. Кроме известных, поля редактирования обладают свойствами приведенными в табл.13.7.

Таблица 13.7. Свойства TEdit

Свойство	Описание свойства	Примеры значений
CharCase	Вид набираемых символов в поле	ecNormal — обычные, ecUpperCase — прописные, ecLowerCase — строчные
Ctl3D	Объемное представление компонента	True, False
PasswordChar	Символ для ввода пароля	#0 — прямое отображение текста, * — текст будет отображаться звездочками, 0 — текст будет нулями
ReadOnly	Возможность изменять текст (доступность поля)	True — текст нельзя изменить, False — текст можно изменить
Hint	Текст подсказки, которая появляется при наведении курсора мыши	«Введите число» — произвольный ряд символов
ShowHint	Показывать/Не показывать подсказку	True, False
Text	Текст в поле редактирования	«89,3» — произвольный ряд символов

Компонент tRadioButton (переключатель)

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

Переключатель помещается на форму с помощью кнопки на стандартной панели инструментов. Некоторые свойства переключателей приведены в табл. 14.2.

Таблица 13.8. Свойства TRadioButton

Свойство	Описание свойства	Примеры значений
Checked	Состояние переключателя	True — включен, False — выключен
Сарtion	Текст, видимый справа от переключателя	«Доллары» — произвольный ряд символов

Пример 14.1. При нажатии на кнопки «Ответ» в окне появляется строка, соответствующая выбранному переключателю (рис. 14.1)

Рис. 14.1. Пример использования компонента TRadioButton (переключатель)

Обработка события, вызванного нажатием на кнопку, имеет такой вид:

procedure TForm1.Button1Click(Sender: TObject);

begin

if RadioButton1.Checked then Edit1.Text:='Ваш возраст - до 20 лет.';

if RadioButton2.Checked then Edit1.Text:='Ваш возраст - от 21 до 30 лет.';

if RadioButton3.Checked then Edit1.Text:='Ваш возраст - от 31 до 40 лет.';

if RadioButton4.Checked then Edit1.Text:='Ваш возраст - от 41 до 50 лет.';

if RadioButton5.Checked then Edit1.Text:='Ваш возраст - от 51 до 60 лет.';

if RadioButton6.Checked then Edit1.Text:='Ваш возраст - после 60 лет.';

end;