Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Другое / Другие методич. материалы / Лабораторная работа Визуальное программирование Среда Delphi
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 24 мая.

Подать заявку на курс
  • Другое

Лабораторная работа Визуальное программирование Среда Delphi

библиотека
материалов

Лабораторная работа №15


Лабораторная работа №15


Тема: Среда программирования Delphi

Цель: Получить практические навыки визуального программирования в интегрированной среде разработки Delphi.

Оборудование: IBM – совместимые компьютеры.

Место проведения: Компьютерный класс.

Техника безопасности: См. инструкцию.


Ход работы:

Напишем простую программу, вычисляющую синус введенного числа.

1. Создайте каталог для нового проекта. Выберите пункт меню File | New Application. Сразу же сохраните новый проект в данном каталоге.

2. Разместите на форме две кнопки с надписями «Вычислить» и «Выход», три компонента Label (статический текст) и компонент Edit (строка редактирования).

3. Установите следующие значения свойств компонентов:

Для компонента Edit очистите значение свойства Text (в этом свойстве типа String будет содержаться введенная строка).

4. Добавьте на форму кнопку-выключатель CheckBox и группу радиокно­пок RadioGroup. Эти кнопки используются для установки различных флагов и режимов выполнения задачи. Кнопки-выключатели могут переключаться независимо друг от друга, а в группе радиокнопок включенной может быть только одна из них. Зададим для CheckBox значение свойства Caption - Градусы (аргу­мент синуса измеряется в градусах, а если кнопка выключена, то в радианах). Для проверки состояния кнопки-выключателя используется свойство Checked: Boolean, возвращающее True, если кнопка включена (помечена), и False в про­тивном случае.

5. Для занесения кнопок в группу радиокнопок нажмем «...» напротив свойства Items компонента RadioGroup1. В раскрывшемся диалоговом окне за­пишем наименования радиокнопок в три строчки: sin cos tg . В свойство Caption запишем Функции.

Состояние группы радиокнопок проверяется с помощью ее свойства ItemIndex типа Integer. Если ItemIndex равен 0, то включена первая по порядку кнопка, если 1, то 2-я и т.д. Если -1, то ни одна из кнопок не включена.

Форма с первоначально установленными компонентами будет иметь вид

hello_html_279e7564.png

После изменения свойств Caption и Tex форма примет следующий вид


hello_html_m4ed5b8a9.pngI

6. Откомпилируйте приложение. Убедитесь, что с помощью Edit можно вводить и редактировать строки. Однако пока никаких действий с введенной строкой не выполняется.

5. Чтобы вычисления над введенной строкой выполнялись, создайте сле­дующие обработчики событий.

Для события OnClick кнопки Button1:

procedure TForm1.Button1Click(Sender: TObject);

var x: real; // Введенное значение

code: integer; // Код возврата операции преобразования

// строка - число s: string;

begin

val(Edit1.text,x,code); //Преобразование строка-число

if CheckBox1.Checked then x:=pi*x/180.0; //Перевод в радианы

case RadioGroup1.ItemIndex of // Варианты расчета

0,-1: x:=sin(x);

1: x:=cos(x);

2: x:=sin(x)/cos(x);

end;

str(x:7:4, s); // Преобразование число-строка

Label3.Caption:=S; // Вывод результата

end;

Для события OnClick кнопки Button2:

procedure TForm1.Button2Click(Sender: TObject);

begin

Close;

end;

6. Откомпилируйте и выполните проект. Результат его работы будет иметь следующий вид


hello_html_m318280cb.png

7. Модифицируем проект. Для выделенного компонента Edit1 найдите в инспекторе объектов событие OnChange, возникающее при изменении текста внутри TEdit, раскройте комбинированный список напротив OnChange и выбе­рите в нем уже созданный обработчик событий Button1Click. Теперь эта проце­дура будет вызываться при наступлении события OnChange, следовательно, вычисления будут происходить синхронно с вводимым текстом. Убедитесь в этом, выполнив проект.

Задания

  1. Доработайте проект, предусмотрев обработку исключительных ситуаций при вводе аргумента.

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

  3. Оформить отчет в электронном виде. Отчет должен содержать: номер лабораторной работы, тему, цель работы, листинг программы, комментарии, ответы на контрольные вопросы.



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

  1. Каким способом вызывается программа Delphi?

  2. Опишите вид экрана после загрузки программы.

  3. Какие компоненты размещены в главном окне?

  4. Как создается стартовая форма приложения?

  5. Перечислите основные компоненты формы.

  6. Что в Delphi подразумевается под "событием"?

  7. Что включает "обработчик события"?

  8. Как сохранить проект?

  9. Вызов проекта на выполнение.

  10. Что входит в структуру простой программы Delphi?



Литература

  1. Культин Н. Б. Основы программирования в Delphi XE. — СПб.: БХВ-Петербург, 2011. — 416 с.: ил. + CD-ROM — (Самоучитель)

  2. Семакин И.Г Основы программирования и баз данных: учебник для студ. учреждений сред. проф. образования. — М.: Издательский центр «Академия», 2014. — 224 с.

  3. Семакин И.Г., Шестаков А.П. Основы алгоритмизации и программирования: учебник для студ учреждений сред. проф. образования — М. : Издательский центр «Акаде­мия», 2013.— 304 с.



4


Автор
Дата добавления 30.11.2016
Раздел Другое
Подраздел Другие методич. материалы
Просмотров38
Номер материала ДБ-402570
Получить свидетельство о публикации

Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Похожие материалы

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