Создание электронного учебника

Размещено на http://www.allbest.ru/

Создание электронного учебника

Введение

Delphi - это среда быстрой разработки, в которой в качестве языка программирования используется язык Delphi. Язык Delphi - строго типизированный объектно-ориентированный язык, в основе которого лежит хорошо знакомый программистам Object Pascal.

В настоящее время программистам стала доступна очередная версия пакета Delphi - Borland Delphi 7 Studio. Как и предыдущие версии, Borland Delphi 7 Studio позволяет создавать самые различные программы: от простейших однооконных приложений до программ управления распределенными базами. В состав пакета включены разнообразные утилиты, обеспечивающие работу с базами данных, XML-документами, создание справочной системы, решение других задач. Отличительной особенностью седьмой версии является поддержка технологии .NET.

Электронный учебник - это продукт образовательного характера, который может быть воспроизведен (использован) только с помощью средств информатики (в том числе и компьютера), соответствующий утвержденной программе обучения или программе, разработанной автором для предложенного курса, и имеющий принципиально новые черты.

Компоненты электронного учебника: презентационная составляющая (содержит основную информационную часть курса); упражнения, способствующие закреплению полученных знаний; тесты, позволяющие проводить объективную оценку знаний учащегося. Электронный учебник должен содержать: обложку, титульный экран, оглавление, аннотацию, полное изложение учебного материала, краткое изложение учебного материала, дополнительную литературу, систему проверки знаний, систему рубежного контроля, функцию поиска текстовых фрагментов, список авторов, словарь терминов, справочную систему по работе с управляющими элементами электронного учебника, систему управления работой с учебником.

«Основы экономики» - обязательная дисциплина во всех вузах России. Знание азов экономики формирует представление личности о рыночных отношениях, капитализме, помогает освоить современные условия жизни общества.

Содержание дисциплины определяется дидактическими единицами ГОС по специальности «Прикладная информатика в экономике».

Электронный учебник по экономике предназначен для организации самостоятельной работы учащихся и поддержки курсов по экономике в вузах. Материал структурирован таким образом, что можно быстро найти нужную информацию по той или иной теме. Использование данной программы поможет студентам изучать экономику самостоятельно, так же имеется возможность проверки знаний, что позволяет студенту определить, насколько хорошо усвоен теоретический материал.

1. Анализ предметной области

1.1 Постановка задачи

1.1.1 Основное функциональное назначение программного средства

Программный комплекс разработан в программной среде разработки Borland Delphi для самостоятельного освоения дисциплины «Основы экономики», получения дополнительных знаний и их контроля. При выполнении данного задания должны быть использованы стандартные объекты.

1.1.2 Основание для разработки

Основанием для разработки данной программы является учебный план по специальности «Прикладная информатика в сфере экономики» филиала ГОУ ВПО «Иркутский Государственный университет» в г. Братске. Целью разработки является усвоение студентом дисциплины ВМИиП.

1.1.3 Назначение разработки

Электронный учебник включает:

· модуль с теоретическим и лекционным материалом, подобранным в соответствии с дидактическими единицами, обобщенный и структурированный по темам;

· модуль контроля знаний (тестирование);

· справка о программе.

1.1.4 Требования к программному средству

Программа дает возможность:

· по запросу пользователя открывать требуемый модуль;

· просматривать теоретический материал по разделам и темам;

· при тестировании видеть результаты своих действий;

· получить справку о программе;

· выход.

1.2 Выбор подхода и модели разработки ПС

При разработке электронного учебника использовался объектный подход, так как электронный учебник - это совокупность объектов, взаимодействие между которыми осуществляется при помощи передачи сообщений. Переход на следующую стадию разработки осуществлялся после того, как полностью были завершены все проектные операции предыдущей стадии и получены все исходные данные для следующей стадии. То есть была использована каскадная модель.

2. Анализ требований и разработка спецификаций

2.1 Описание структуры входной и выходной информации

Входные данные:

Выбор пользователем варианта ответа на вопрос при тестировании.

Выходные данные:

По окончанию тестирования при нажатии кнопки ОК выводятся на экран неправильные вопросы с целью, чтобы пользователь на месте разобрался со своими ошибками.

2.2 Описание объектов, свойств и методов

Первая форма «Добро пожаловать!»

TForm1 = class(TForm) - главная форма

Label1: TLabel; - заголовок «Электронный учебник»

Label2: TLabel; - заголовок «по дисциплине»

Label3: TLabel; - заголовок «Основы экономики»

Exit: TButton1; - кнопка «Выход»

Aboutpr: TButton2; - кнопка «Лекции»

Aboutpr: TButton3; - кнопка «О программе»

Form1 Label1

Свойство	Значение
Caption	Добро пожаловать!
Color	clGradientInactive
Height	543
Left	195
Top	267
Width	927
Свойство	Значение
Caption	Электронный учебник
Size	20
Height	31
Left	216
Top	32
Width	473
WordWrap	true

Label2

Свойство	Значение
Caption	по дисциплине
Size	24
Height	40
Left	288
Top	80
Width	335
WordWrap	true

Label3

Свойство	Значение
Caption	Основы экономики
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Button 1,2,3

Свойство	Значение
Caption	О программе, лекции, выход
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Вторая форма «Лекции»

Aboutpr: TButton1; - кнопка «Основные этапы развития экономики»

Aboutpr: TButton2; - кнопка «Экономическая система»

Aboutpr: TButton3 - кнопка «Сущность рынка»

Aboutpr: TButton4; - кнопка «Предпринимательская деятельность»

Aboutpr: TButton5; - кнопка «Денежная система»

Aboutpr: TButton6; - кнопка «Государственный бюджет»

Aboutpr: TButton7; - кнопка «Назад»

Aboutpr: TButton8; - кнопка «Тестирование»

Button 1,2,3,4,5,6,7,8

Свойство	Значение
Caption	Основные этапы развития экономики, экономическая система, сущность рынка, предпринимательская деятельность, денежная система, государственный бюджет, назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Третья форма «О программе»

Label1: TLabel; - заголовок «Электронный учебник разработала»

Label2: TLabel; - заголовок «студентка группы ПИзсс-10»

Label3: TLabel; - заголовок «Дорофеева Ольга»

Label 1,2,3

Свойство	Значение
Caption	по дисциплине
Size	24
Height	40
Left	288
Top	80
Width	335
WordWrap	true

Четвертая форма «Основные этапы развития экономики»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Пятая форма «Тестирование»

RadioGroup1: TRadioGroup; - группа вариантов ответа на вопрос «Что такое рынок?»

RadioGroup2: TRadioGroup; - группа вариантов ответа на вопрос «Что такое экономика?»

RadioGroup3: TRadioGroup; - группа вариантов ответа на вопрос «Определение государственного бюджета»

BitBtn1: TBitBtn; - обрабатывает результаты теста.

Button 1

Название	Значение
Height	22
Kind	BkOK
Left	555
Top	444
Width	77

RadioGroup1,2,3

Элемент	Свойство	Значение
RadioButton7
	Caption	Вопросы
	Checked	True
	FontSize	13
	Height	22
	Left	456
	Top	357
	Width	222

Шестая форма «Результат теста»

Label1: TLabel; - заголовок «Поздравляем с прохождением дисциплины экономика»

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Седьмая форма «Предпринимательская деятельность»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Восьмая форма «Денежная система»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Девятая форма «Сущность рынка»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Десятая форма «Экономическая система»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Одиннадцатая форма «Денежная система»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

Двенадцатая форма «Государственный бюджет»

Memo1: TMemo; - компонент, отражающий текст с датами

Button1: TButton; - кнопка «Назад» закрывает форму

Button 1

Свойство	Значение
Caption	Назад
Size	14
Height	41
Left	264
Top	152
Width	377
WordWrap	true

Memo 1

Свойство	Значение
Color	clCream
Size	10
Height	777
Left	0
Top	-3
Width	673
ReadOnly	True
ScrollBars	ssNone

3. Проектирование

3.1 Декомпозиция поставленной задачи

Основная задача: разработка электронного учебника.

Подзадачи:

· создание модуля с теоретическим материалом

· создание модуля с тестированием

· создание процедур, требуемых для взаимодействия модулей.

3.2 Общая архитектура ПС

Каждый раздел разбивается на темы. С формы каждого раздела можно перейти не предыдущую форму.

3.3 Реализация функционального назначения ПС

3.4 Разработка алгоритма решения задачи

учебник электронный программный алгоритм

3.4.1 Детальная разработка алгоритмов отдельных подзадач

· создание модуля с теоретическим материалом.

При нажатии кнопки «Лекции» открывается форма с содержанием теоретического материала, который разбит на разделы. При нажатии на кнопку с нужным разделом открывается форма с материалом, который структурирован по темам в виде вкладок. Кнопка «Назад» позволяет перейти на предыдущую страницу.

· создание модуля «О программе».

При нажатии кнопки «О программе» открывается форма, содержащая информацию о разработчике программы. Кнопка «Назад» позволяет перейти на предыдущую страницу.

· создание модуля с тестированием.

При нажатии кнопки контроль знаний открывается форма с тестированием. Все вопросы представлены на одной форме. Пользователь выбирает один из трех правильных вариантов и по окончании теста нажимает кнопку «ОК». После нажатия кнопки ОК можно узнать, в каких вопросах была допущена ошибка. При помощи созданной процедуры подсчитывается количество правильных ответов и в окне выводится результат.

· создание процедур, требуемых для взаимодействия модулей.

Все созданные процедуры осуществляют переход с одной формы на другую, задают параметры форм.

3.5 Разработка интерфейса ПС

Возможно, наиболее важным дополнением к языку Object Pascal стала поддержка интерфейсов. Интерфейс определяет набор функций и процедур, которые могут быть использованы для взаимодействия программы с объектом.

В данной разработке создан процедурно-ориентированный интерфейс.

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

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

пользовательский интерфейс должен базироваться на терминах и понятиях, знакомых пользователю;

пользовательский интерфейс должен быть единообразным;

пользовательский интерфейс должен позволять пользователю исправлять собственные ошибки.

4. Кодирование

4.1 Выбор среды разработки

Delphi - это объектно-ориентированная среда для визуального проектирования Windows-приложений с развитыми механизмами повторного использования программного кода.

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

Для создания в Delphi несложных программных продуктов совершенно необязательно понимать внутреннюю структуру Windows-приложения, получаемого после разработки в Delphi. Достаточно просто уметь работать с некоторыми компонентами, поставляемыми вместе со средой разработчика. При этом начать работу со средой можно практически без предварительного ознакомления, а написание первого приложения не потребует углубления в особенности системы. Этому отчасти способствует удобный интерфейс среды разработчика, не перегруженный излишними вопросами к разработчику.

Программирование в Delphi состоит из двух основных этапов:

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

2. Написание программного кода на языке Object Pascal для обеспечения особой функциональности приложения, которую невозможно достичь использованием визуального построения.

4.2 Характеристика языка программирования

Object Pascal - полностью объектно-ориентированный диалект языка Pascal, разработанный фирмой Borland. Начиная с Delphi 7 фирма Borland начала официально называть свой язык Delphi. Однако Object Pascal поддерживается и развивается другими разработчиками. Наиболее серьёзные реализации Object Pascal (помимо Delphi) - это TMT Pascal, Virtual Pascal и Free Pascal.

Паскамль (англ. Pascal) - язык программирования общего назначения.

Был создан Никлаусом Виртом в 1970, после его участия в работе комитета разработки стандарта языка Алгол, как язык для обучения процедурному программированию. Название языку дано в честь выдающегося французского математика, физика, литератора и философа Блеза Паскаля. Первоначально язык компилировался в байт-код, подобно языку Java.

Особенностями языка являются строгая типизация и наличие средств структурного (процедурного) программирования. Паскаль был одним из первых таких языков. По мнению Н. Вирта, язык должен способствовать дисциплинированию программирования, поэтому, наряду со строгой типизацией, в Паскале сведены к минимуму возможные синтаксические неоднозначности, а сам синтаксис интуитивно понятен даже при первом знакомстве с языком. Тем не менее, первоначально язык обладал множеством недостатков: невозможность передачи функциям массивов переменной длины, отсутствие нормальных средств работы с динамической памятью, ограниченная библиотека ввода-вывода, отсутствие средств для подключения функций написанных на других языках, отсутствие средств раздельной компиляции и т.п. Полный разбор недостатков языка Паскаль был выполнен Брайаном Керниганом в статье «Почему Паскаль не является моим любимым языком программирования». Необходимо заметить, что многие перечисленные недостатки языка не проявляются или даже становятся достоинствами при обучении программированию. Кроме того, основным языком программирования в академической среде 70-х был Фортран, обладавший гораздо более существенными недостатками, и Паскаль представлял собой значительный шаг вперед.

4.3 Структура программы

Учебник.dpr - файл проекта создается во время работы над проектом. Этот файл содержит исходный текст главной программы приложения. (Project.dpr)

Unit.pas - файлы модулей проекта, представляют собой файлы с исходными текстами программ на языке Pascal.

Project.dof - файлы опций проекта хранят установки, определенные во вкладках окна Project Options. Такой файл создается при первом же сохранении проекта и обновляется при каждом последующем (Project.dof).

4.4 Листинги

Первая форма «Электронный учебник»

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

Type

TGlavnaya = class(TForm)

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Button1: TButton;

Button2: TButton;

Button3: TButton;

procedure Button3Click (Sender: TObject);

procedure Button2Click (Sender: TObject);

procedure Button1Click (Sender: TObject);

procedure Label3Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Glavnaya: TGlavnaya;

implementation

uses Unit2, Unit3;

{$R *.dfm}

procedure TGlavnaya. Button3Click (Sender: TObject);

begin

close

end;

procedure TGlavnaya. Button2Click (Sender: TObject);

begin

leccii.show;

glavnaya.hide;

end;

procedure TGlavnaya. Button1Click (Sender: TObject);

begin

programma.show;

glavnaya.hide;

end;

procedure TGlavnaya. Label3Click (Sender: TObject);

begin

end;

procedure TGlavnaya. FormCreate (Sender: TObject);

begin

end;

end.

Вторая форма «Лекции»

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TLeccii = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button6: TButton;

Button7: TButton;

Button9: TButton;

Button5: TButton;

procedure Button1Click (Sender: TObject);

procedure Button2Click (Sender: TObject);

procedure Button5Click (Sender: TObject);

procedure Button3Click (Sender: TObject);

procedure Button4Click (Sender: TObject);

procedure Button6Click (Sender: TObject);

procedure Button7Click (Sender: TObject);

procedure Button9Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Leccii: TLeccii;

implementation

uses Unit1, Unit4, Unit5, Unit7, Unit8, Unit9, Unit10, Unit11, Unit12;

{$R *.dfm}

procedure TLeccii. Button1Click (Sender: TObject);

begin

glavnaya.show;

leccii. Hide;

leccii. Position:=poScreenCenter;

leccii. FormStyle:=fsStayOnTop;

end;

procedure TLeccii. Button2Click (Sender: TObject);

begin

form4.show;

leccii.hide;

end;

procedure TLeccii. Button5Click (Sender: TObject);

begin

Leccii. Hide;

Form5.show;

end;

procedure TLeccii. Button3Click (Sender: TObject);

begin

Leccii. Hide;

Form8.show;

end;

procedure TLeccii. Button4Click (Sender: TObject);

begin

form9.show;

leccii. Hide;

end;

procedure TLeccii. Button6Click (Sender: TObject);

begin;

form10.show;

leccii. Hide;

end;

procedure TLeccii. Button7Click (Sender: TObject);

begin

form11.show;

leccii. Hide;

end;

procedure TLeccii. Button9Click (Sender: TObject);

begin

form12.show;

leccii. Hide;

end;

procedure TLeccii. FormCreate (Sender: TObject);

begin

end;

end.

Третья форма «О программе»

unit Unit3;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

Tprogramma = class(TForm)

Button1: TButton;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

programma: Tprogramma;

implementation

uses Unit1;

{$R *.dfm}

procedure Tprogramma. Button1Click (Sender: TObject);

begin

glavnaya.show;

programma. Hide;

end;

procedure Tprogramma. FormCreate (Sender: TObject);

begin

end;

end.

Четвертая форма «Основные этапы развития экономики»

unit Unit4;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, OleCtrls, SHDocVw, ComCtrls;

type

TForm4 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click (Sender: TObject);

procedure Memo1Change (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form4: TForm4;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm4. Button1Click (Sender: TObject);

begin

form4. Hide;

leccii.show;

end;

procedure TForm4. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm4. FormCreate (Sender: TObject);

begin

end;

end.

Пятая форма «Тестирование»

unit Unit5;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, ExtCtrls, Buttons;

type

TForm5 = class(TForm)

Button1: TButton;

GroupBox1: TGroupBox;

RadioButton1: TRadioButton;

RadioButton2: TRadioButton;

RadioButton3: TRadioButton;

RadioGroup1: TRadioGroup;

BitBtn1: TBitBtn;

RadioGroup2: TRadioGroup;

RadioButton4: TRadioButton;

procedure Button1Click (Sender: TObject);

procedure BitBtn1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form5: TForm5;

implementation

uses Unit2, Unit6;

{$R *.dfm}

procedure TForm5. Button1Click (Sender: TObject);

begin

form5.hide;

leccii.show;

end;

var

i: Integer;

procedure TForm5. BitBtn1Click (Sender: TObject);

begin

i:=0; // Счётчик количества правильных ответов

If RadioButton4. Checked = True // Проверка выбранного варианта

Then

Begin

{Проверка результатов тестирования}

if RadioButton1.checked = False

then showmessage ('Вы ошиблись в первом вопросе')

else i:=i+1;

if radiogroup1.itemindex <> 0

then showmessage ('Вы ошиблись во втором вопросе')

else i:=i+1;

if RadioButton4.checked = False

then showmessage ('Вы ошиблись в третьем вопросе')

else i:=i+1;

end;

if i=3 then

begin

(*Завершение тестирования*)

Form6. Show; // Открытие финальной формы

Form5. Close; // Закрытие тестовой формы

End;

end;

procedure TForm5. FormCreate (Sender: TObject);

begin

end;

end.

Шестая форма «Результат теста»

unit Unit6;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm6 = class(TForm)

Label1: TLabel;

Button1: TButton;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form6: TForm6;

implementation

{$R *.dfm}

procedure TForm6. Button1Click (Sender: TObject);

begin

close;

end;

procedure TForm6. FormCreate (Sender: TObject);

begin

end;

end.

Восьмая форма «Экономическая система»

unit Unit8;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm8 = class(TForm)

Memo1: TMemo;

Button1: TButton;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form8: TForm8;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm8. Button1Click (Sender: TObject);

begin;

leccii.show;

form8. Hide;

end;

procedure TForm8. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm8. FormCreate (Sender: TObject);

begin

end;

end.

Девятая форма «Сущность рынка»

unit Unit9;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm9 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form9: TForm9;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm9. Button1Click (Sender: TObject);

begin

leccii.show;

form9. Hide;

end;

procedure TForm9. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm9. FormCreate (Sender: TObject);

begin

end;

end.

Десятая форма «Предпринимательская деятельность»

unit Unit10;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm10 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form10: TForm10;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm10. Button1Click (Sender: TObject);

begin

form10. Hide;

leccii.show;

end;

procedure TForm10. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm10. FormCreate (Sender: TObject);

begin

end;

end.

Одиннадцатая форма «Денежная система»

unit Unit11;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm11 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form11: TForm11;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm11. Button1Click (Sender: TObject);

begin

form11. Hide;

leccii.show;

end;

procedure TForm11. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm11. FormCreate (Sender: TObject);

begin

end;

end.

Двенадцатая форма «Государственный бюджет»

unit Unit12;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm12 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form12: TForm12;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm12. Button1Click (Sender: TObject);

begin;

form12. Hide;

leccii.show;

end;

procedure TForm12. Memo1Change (Sender: TObject);

begin

Memo1. Lines. LoadFromFile ('F:\Projects\Uch_mat');

end;

procedure TForm12. FormCreate (Sender: TObject);

begin

end;

end.

5. Тестирование и отладка

Главная форма

Лекции

О программе



Теоретический материал

Тестирование

Результат тестирования

Заключение

В данной курсовой работе была рассмотрена разработка обучающих электронных систем. Примером служит разработанный учебник по «Основам экономики».

Повсеместное внедрение новых информационных технологий приводит к нехватке программных средств. Разработка электронного учебного пособия по экономике - это вклад в развитие российского рынка прикладного обеспечения.

Поставленные цели:

· предоставить учащимся электронный учебник «Основы экономики» для того, чтобы доступно и легко донести теоретический материал с последующим контролем знаний;

· выполнение обучающей и контролирующей функции;

· провести анализ теоретического материала предлагаемого к компьютерной реализации с целью определения его пригодности к подобной реализации и степень ее эффективности;

· возможность дополнять теоретический материал, так как сфера экономики не стоит на месте.

Решения поставленной цели:

· изучение среды программирования Borland Delphi 7.0;

· анализ теоретического материала (в соответствии с дидактическими единицами), предназначенного для студентов 1 курса специальности «Прикладная информатика в экономике»;

· подобран материал для тестирования.

Размещено на Allbest.ru