
- •Визуальное программирование в delphi
- •Упражнение №2
- •Калькулятор_1
- •Основные компоненты: форма, текстовое поле, кнопка.
- •Конструирование формы. Программирование кнопок.
- •Теоретические сведения. Компонент форма (Form) используется для создания окна программы – приложения. Рассмотрим основные свойства формы.
- •Выполнение работы Создание проекта и макета формы
- •Запустите систему визуального программирования Delphi.
- •Исследуйте способы активизации четырех окон Delphi:
- •Создайте свою папку.
- •Сохраните программу в своей папке.
- •Ознакомьтесь со свойствами формы Left, Top, Width и Height.
- •Измените цвет фона формы.
- •Запустите программу на выполнение.
- •Введите заголовок.
- •Разместите на форме поле pедактирования (объект типа tEdit).
- •Разместите на форме еще 2 объекта типа tEdit, текстовые поля для меток (объекты типа tLabel) и 2 командные кнопки ( объекты типа tButton).
- •Программирование
- •Создайте обработчики событий формы для полей ввода Edit1, Edit2 и вывода Edit3.
- •Создайте обработчик события для командной кнопки Button1.
- •Создайте обработчик события для командной кнопки Button2.
Запустите программу на выполнение.
Запустить программу на выполнение можно несколькими способами:
- используя команду Run\Run главного меню;
- щелкнув на кнопке
Run
панели инструментов;
- нажав функциональную клавишу F9;
- выполнить до курсора – Run\Run to Cursor или F4;
- выполнить строку
с заходом в п\п – или Run\Trace
Into,
или кнопка
,
или F7;
- выполнить строку
без захода в п\п – или Run\Trace
Over,
или кнопка
,
или F8
- завершить отладку – Run\Program Reset или Ctrl+F2
- отобразить окно наблюдения - Run\Add Watch… или нажать Ctrl+F5, ввести имя переменной или выражение, нажать OK. Появившееся окно Watch List можно отбуксировать к нижней части окна редактора кода и объединить с окном Messages, как показано на рисунке. Чтобы добавить в окно наблюдения новую переменную, можно установить на ней курсор в окне редактора кода, активизировать окно наблюдения, сделать на нем двойной щелчок и нажать кнопку OK.
- установить точку останова – щелкнуть в окне редактора кода на сером поле перед строкой, на которой д.б. эта точка (см. рисунок).
- убрать точку останова – повторить действия п. 7.
Введите заголовок.
Для этого щелчком активизируйте окно формы, в диалоге (в окне диалога) Инспертора объектов (Object Inspector), на вкладке Properties щелкните на поле Caption и введите заголовок формы Калькулятор.
Разместите на форме поле pедактирования (объект типа tEdit).
Для этого
разместите на форме поле ввода Edit1
следующим образом: щелкните на кнопке
Edit
панели инструментов Component
Palette,
а затем
щелкните на
форме в том месте, где должен располагаться
левый верхний угол этого УЭ. Измените,
при необходимости, размеры и положение
УЭ мышкой или заданием значений свойствам
Hight,
Width,
Left
и Top.
Разместите на форме еще 2 объекта типа tEdit, текстовые поля для меток (объекты типа tLabel) и 2 командные кнопки ( объекты типа tButton).
Рис.2.1. Общий вид формы «Калькулятор».
На рис.2.1:
Label1,
Label2,
Label3
– метки (тип Tlabel,
инструмент Label
).
Edit1, Edit2, Edit3 – поля ввода (тип T Edit, инструмент ).
Button1
и Button2
– командные кнопки (тип TButton,
инструмент
).
В соответствии с рис.2.1 разместите на форме (соблюдая порядок) поля
ввода Edit2 и Edit3, затем командные кнопки Button1 и Button2, а также метки Label1, Label2 и Label3, используя кнопку Button, а также кнопку Label соответственно.
Для изменения надписей на командных кнопках и метках используйте их свойство Caption.
Запустите программу на выполнение.
Для этого
щелкните
на кнопке
Run
(F9)
панели инструментов Debug
или введите команды Run\
Run
и завершите
ее работу, закрыв окно формы.
Программирование
Создайте обработчики событий формы для полей ввода Edit1, Edit2 и вывода Edit3.
Для этого:
а) Щелкните на форме и затем сделайте двойной щелчок на строке события OnCreate на вкладке Events в диалоге Object Inspector. В результате Delphy добавит в класс TForm1 формы заголовок нового метода
procedure FormCreate(Sender: TObject);
а в раздел реализации – описание этого метода с пустым телом
procedure TForm1.FormCreate(Sender: TObject); begin end;
Аналогичные действия для создания обработчика любого события любого УЭ приведут к аналогичным результатам, поэтому в дальнейшем они будут коротко называться ‘создать шаблон обработчика события …’ или ‘добавить пустой метод …’.
в) В тело обработчика вставьте операторы, которые задают начальные
значения свойствам Text:
Edit1.Text:='0';Edit2.Text:='0';Edit3.Text:='0';
с) Запустите программу на выполнение и проверьте результат. Подобным
образом проверяйте работу каждого создаваемого обработчика или его части.