
- •Введение
- •Лабораторная работа №1. Создание простого приложения
- •1 ) Последовательность действий по созданию интерфейса пользователя
- •2) Последовательность действий по программированию щелчка по командным кнопкам (программирование событий):
- •3) Компиляция и выполнение приложения
- •1) Последовательность действий по созданию интерфейса пользователя
- •2) Последовательность действий по программированию событий
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа №2. Циклические программы. Многострочное поле memo
- •1) Последовательность действий по созданию интерфейса пользователя
- •2) Последовательность действий по программированию щелчка по командным кнопкам (программирование событий)
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа №3. Работа с одномерными массивами
- •1) Последовательность действий по созданию интерфейса пользователя
- •2) Последовательность действий по программированию событий
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 4. Работа с двумерными массивами
- •Контрольные вопросы
- •Лабораторная работа № 5. Процедуры и функции в delphi
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 6. Рекурсивные процедуры и функции
- •Контрольные вопросы
- •Лабораторная работа №7. Разработка приложения с несколькими модулями
- •2) Последовательность действий по программированию событий
- •Лабораторная работа №8. Работа со строками
- •1) Последовательность действий по созданию интерфейса пользователя
- •2) Последовательность действий по программированию событий
- •3) Откомпилируйте приложение и проверьте его работу задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа №9. Создание текстового редактора
- •Задание для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 10. Методы простой сортировки
- •Задание для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 11. Поиск данных в массиве
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа №12. Работа с файлами
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа №13. Работа с типизированными файлами (файлы записей)
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 14. Динамические структуры данных . Стек и очередь
- •Задания для самостоятельной работы
- •Контрольные вопросы
- •Лабораторная работа № 15. Практическое применение стека и очереди
- •Лабораторная работа №16. Линейные списки
- •Лабораторная работа №17. Работа с бинарными деревьями поиска
- •Задание для самостоятельной работы
- •Лабораторная работа №18. Основы объектно-ориентированного программирования
- •Задание для самостоятельной работы
- •Лабораторная работа №19. Графика в delphi. Компоненты shape и chart
- •Контрольные вопросы
- •Лабораторная работа №20. Графика в delphi. Рисование по пикселам и пером
- •Контрольные вопросы
- •Лабораторная работа № 21. Вычисление суммы ряда
- •Литература
- •Содержание
- •214013 Г. Смоленск, Энергетический проезд, 1
Какую работу нужно написать?
МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ
ФИЛИАЛ ФЕДЕРАЛЬНОГО ГОСУДАРСТВЕННОГО БЮДЖЕТНОГО ОБРАЗОВАТЕЛЬНОГО УЧРЕЖДЕНИЯ ВЫСШЕГО ПРОФЕССИОНАЛЬНОГО ОБРАЗОВАНИЯ «НАЦИОНАЛЬНЫЙ ИССЛЕДОВАТЕЛЬСКИЙ УНИВЕРСИТЕТ «МЭИ» В Г. СМОЛЕНСКЕ
А.П. Нестеров, Е.А.Панкратова, А.А. Сизов, И.А. Чертков
ОСНОВЫ ПРОГРАММИРОВАНИЯ
В СРЕДЕ DELPHI 7.0
СБОРНИК ЛАБОРАТОРНЫХ РАБОТ
ПО ДИСЦИПЛИНЕ
«ПРОГРАММИРОВАНИЕ НА ЯЗЫКАХ ВЫСОКОГО УРОВНЯ»
Смоленск, 2012
УДК
П
Допущено учебно-методическим Советом филиала ФГБОУ ВПО «НИУ МЭИ» в г. Смоленске в качестве методического пособия для студентов, обучающихся в филиале ФГБОУ ВПО «НИУ МЭИ» в г. Смоленске по направлению подготовки бакалавров «Информатика и вычислительная техника»
Подготовлено на кафедре «Информатики»
Рецензент
Старший преподаватель филиала ФГБОУ ВПО «НИУ МЭИ» в г. Смоленске А.И. Гаврилов
Нестеров А.П. ОСНОВЫ ПРОГРАММИРОВАНИЯ В СРЕДЕ DELPHI 7.0. Методические указания к лабораторным работам по дисциплинам «Программирование на языках высокого уровня» и «Информатика и программирование» / А.П. Нестеров, Е.А. Панкратова, А.А. Сизов, И.А. Чертков – Смоленск: РИО филиала ФГБОУ ВПО «НИУ МЭИ» в г. Смоленске, 2012. – 100 с.
В сборнике приводится описания лабораторных работ, соответствующих программам дисциплин «Программирование на языках высокого уровня» и «Информатика и программирование».
Целью сборника является изучение среды визуального программирования Delphi 7. Студенты знакомятся с основными приемами программирования в среде Delphi, а также ее главными частями – палитрой компонентов, инспектором объектов, вспомогательными инструментами.
При выполнении лабораторных работ студенты используют знания, полученные ранее при изучении дисциплины «Информатика».
©филиал ФГБОУ ВПО «НИУ МЭИ» в г. Смоленск 2012
Введение
Данные методические указания разработаны в соответствии с учебно-методическим комплексом по дисциплинам «Программирование на языках высокого уровня» и «Информатика и программирование»
Пособие предназначено для изучения среды визуального программирования Delphi 7. Студенты знакомятся с основными приемами программирования в среде Delphi, а также ее главными частями – палитрой компонентов, инспектором объектов, вспомогательными инструментами.
Занятия построены таким образом, чтобы постепенно вводить студентов в среду визуального программирования. На каждом занятии рассматриваются различные базовые компоненты Delphi. Таким образом, по окончании курса студент способен самостоятельно разрабатывать достаточно сложные приложения.
Индивидуальные задания студентам на лабораторные работы выдаются преподавателем на каждом занятии.
В данном пособии рассматриваются только компоненты общего назначения, которые понадобятся в любом приложении. Вне рамок данного пособия остались темы, посвященные разработке баз данных, сетевых приложений, WEB-приложений и т.д.
Лабораторная работа №1. Создание простого приложения
ЦЕЛЬ РАБОТЫ: Освоение программной среды Delphi 7. 0, работа с компонентами Label, Edit, Button, с функциями преобразования: целого числа в строку (IntToStr); строки в целое число (StrToInt); действительного числа в строку (FloatToStr); строки в действительное число (StrToFloat).
ПОДГОТОВКА К РАБОТЕ:
Ознакомиться со средой визуального программирования Delphi 7.
Изучить компоненты Label, Edit, Button, их назначение, свойства и методы.
Изучить свойства и методы компонента Panel;
Описать возможные способы выравнивания компонентов (свойство Align);
Методы передачи параметров между процедурами (использование глобальных переменных).
ЗАДАНИЕ 1. Создать приложение, выполняющее арифметические операции над двумя числами (Рисунок 1.1).
1 ) Последовательность действий по созданию интерфейса пользователя
Запустите Delphi.
В инспекторе объектов (Object Inspector) у объекта Form1 установите свойство Caption равным «Арифметические операции»
Перенесите на пустую форму объекты, изображенные на рисунке 1.2.
Установите у созданных объектов следующие свойства:
Label1. Свойство Caption – Первое число
Label2. Свойство Caption – Второе число
Label3. Свойство Caption – Результат
Label4. Свойство Caption – пустая строка
Edit1. Свойство Text – пустая строка
Edit2. Свойство Text – пустая строка
Edit3. Свойство Text – пустая строка
Button1. Свойство Caption – Сложение
Button2. Свойство Caption – Вычитание
Button3. Свойство Caption – Умножение
Button4. Свойство Caption – Деление
2) Последовательность действий по программированию щелчка по командным кнопкам (программирование событий):
Сделайте двойной щелчок мыши по кнопке Button1. Появится окно редактора кода, в котором необходимо набрать следующий текст:
procedure TForm1.Button1Click (Sender: TObject);
VAR
k1,k2,s:Integer;
begin
k1:=StrToInt(Edit1.Text); k2:=StrToInt(Edit2.Text);
s:=k1+k2;
Edit3.Text:=IntToStr(s); Label4.Caption:='Сложение';
end;
Сделайте двойной щелчок мыши по кнопке Button2. Появится окно редактора кода, в котором необходимо набрать следующий текст:
procedure TForm1.Button2Click(Sender: TObject);
VAR
k1,k2,s:Integer;
begin
k1:=StrToInt(Edit1.Text); k2:=StrToInt(Edit2.Text);
s:=k1-k2;
Edit3.Text:=IntToStr(s); Label4.Caption:='Вычитание';
end;
Сделайте двойной щелчок мыши по кнопке Button3. Появится окно редактора кода, в котором необходимо набрать следующий текст:
procedure TForm1.Button3Click(Sender: TObject);
VAR
k1,k2,s:Integer;
begin
k1:=StrToInt(Edit1.Text); k2:=StrToInt(Edit2.Text);
s:=k1*k2;
Edit3.Text:=IntToStr(s); Label4.Caption:='Умножение';
end;
Сделайте двойной щелчок мыши по кнопке Button4. Появится окно редактора кода, в котором необходимо набрать следующий текст:
VAR
k1,k2:Integer;
s:Real;
begin
k1:=StrToInt(Edit1.Text); k2:=StrToInt(Edit2.Text);
s:=k1/k2;
Edit3.Text:=FloatToStr(s); Label4.Caption:='Деление';
end;