ВЫЧИСЛИТЕЛЬНЫЙ ПРАКТИКУМВЫЧИСЛИТЕЛЬНЫЙ ПРАКТИКУМ
Выполнил: студент 2 курса 4 группы факультета физики и математики Исмагилов Р.Р. Проверила: Зинова О.В.
Бирск 2013
Постановка задачи В настоящее время структурированный, объектно-ориентированный язык программирования Delphi могут использоваться на таких платформах как Linux, Mac OS, Windows. Среда разработки Delphi максимально упрощает создание приложения и облегчает жизнь программисту, упрощая процесс формирования внешнего вида программы. При этом можно больше внимания уделить логике выполнения программы и непосредственно заниматься созданием математической части приложения. Целью этого вычислительного практикума является практическое освоение методологии и принципов создания базовых стандартных элементов интерфейса Windows - программы в среде визуального проектирования. Для достижения поставленной цели необходимо решить следующие задачи: - изучить литературу по темам «основы языки программирования Delphi и его компоненты». - разработать формы - реализовать в среде Delphi
Создание программы «таблица умножения» При создании формы «таблица умножения» было использовано 1 компонент Panel, 2 компонента TrackBar, 4 компонента Label.
Рис.1. форма «таблица умножения» в Delphi При передвижении курсором мыши ползунка (полоса прокрутки) происходит вычисление числовых значений и их произведение выводиться в таблицу «Произведения». За произведение чисел отвечает код:
procedure TForm1.TrackBar1Change(Sender: TObject); begin a: =trackbar1.position; label3.Caption: =inttostr(a); c: = a*b; label2.Caption: =inttostr(c); end; procedure TForm1.TrackBar2Change(Sender: TObject); begin b: =trackbar2.position; label4.Caption: =inttostr(b); c: = a*b; label2.Caption: =inttostr(c).
Создание программы «Альбом» При создании формы «Альбом» было использовано 1 компонент Timage, 1 компонент OpenPictureDialog.
Рис.2. форма «Альбом» в Delphi При запуске программы в окне изображается рисунок,. По щелчку мышью на рисунке появляется диалоговое окно. В открывшемся диалоговом окне предоставляется возможность выбрать любой другой рисунок, после выбора рисунка в диалоговом окне в форме отображается выбранный рисунок. За выбор и загрузки рисунка отвечает код: procedure TForm1.Image1Click(Sender: TObject); begin if OpenPictureDialog1.Execute then Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName) End;
Создание программы «Меню» При создании формы «Меню» было использовано 1 компонент Timage, 1 компоненто MainMenu, 1 компонент PopupMenu.
Рис.3. форма «Меню» в Delphi При запуске программы в окне изображается строка меню (Файл, Выход). При выборе пункта меню Рисунки появляется вложенное меню, состоящее из двух пунктов (Лето, Зима) после выбора картинки, рисунок выводиться на форму. Так же По щелчку правой кнопки мыши появляется контекстное меню. За закрытие формы отвечает код: form1.Close; За загрузку изображения отвечает код: image1.Picture.LoadFromFile('лето.bmp');
Создание программы «Таймер» При создании формы «Таймер» было использовано 1 компонент Button, 2 компонента Edit, 1 компонент GroupBox, 1 компонент Timer, 2 компонента UpDown.
Рис.4. форма «Таймер» в Delphi При запуске программы выводиться интревал времени, который может задать пользователь. При нажатии на кнопку «Пуск» начинается отчет времени, текущий отчет времени выводиться в заголовке программы. При истечении времени выводиться диалоговое окно «Заданный интервал истек». За текущий отчет времени отвечает код: ShowTime; За запуск таймера отвечает код: Timer1.Enabled: = True; За отсановку таймера отвечает код: Timer1.Enabled: = False; За ввод интервала отвечает код: UpDown1.Enabled: = True; UpDown2.Enabled: = True Создание программы «Суммирование чисел» При создании формы «Суммирование чисел» было использовано 3 компонента Button, 3 компонента Label, 3 компонента Edit.
Рис.5. форма «Суммирование чисел» в Delphi При запуске програмы выводиться форма с полями сумма для вывода суммы чисел, поле первое и поле второе для ввода чисел. При нажтии на кнопку «Расчет» выводиться сумма этих чисел, при нажатии на кнопку «Очистить» поля очищаются, при нажатии на кнопку «Закрыть» форма закрывается. За суммирование чисел отвечает код: a: =strtoint(edit1.text); b: =strtoint(edit2.text); c: =a+b; edit3.Text: =inttostr(c); За очистку полей отвечает код: edit1.Text: =''; edit2.Text: =''; edit3.Text: =''; За закрытие формы отвечает код: form1.close;
Заключение В результате проделанного вычислительного практикума мною было разработано пять видов программы, в объектно-ориентированном языке программирования Delphi.
Литература 1. В. М. Водовозов: Упаравление документами Word и Excel на VBA. 2. Биллиг В.А., Дехтяръ М.И. VBA и Office 97. 3. Гарнаев А. Самоучитель vba. 4. Биллиг В.А.: Теоретический материал опирается на материал книги VBA в Office 2000. 5. Кузьменко В.Г.: изучение vba 2000. 6. Санна П.: Visual Basic для приложений.
|
