Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Реализация объектной модели

Введение | Абстракция | Прототип | Анализ предметной области |


Читайте также:
  1. V2: Модели прочностной надежности
  2. Аппарат ортогонального проецирования и его модели
  3. Артикулирующие диагностические модели
  4. Астрономические модели мира
  5. Балансовые модели
  6. Блок описывает действия компании, которые необходимы для реализации ее бизнес-модели.
  7. Важное упражнение: проверка этой модели

4.1 Описание пользовательского интерфейса:

Главный интерфейс программы состоит из: Main Menu, меню создания и удаления объектов, изображения самого объекта, а так же выбора действий над объектами, таких как: вычисления площади поверхности и объема икосаэдра.

 

4.2 Описание сеанса с программой:

Начнем с Main Menu: в нем вы сможете узнать информацию о программе, а так же информацию об авторе программы. Далее вы должны создать объект, нажав кнопку “Создать”. После создания вы можете указать длину стороны икосаэдра, и вычислить площадь поверхности или объем, для этого так же имеются кнопки “Объем” и “Площадь поверхности”. Так же после создания объекта вы можете узнать информацию о нем, нажав на кнопку “Информация о объекте”, которая расположена под изображением объекта. После выполненной работы, вы можете повторить процедуры, удалив объект при помощи кнопки “Удалить”, при этом все окна будут очищены. Или же создать еще один объект и сравнить объемы созданных икосаэдров.

 

4.3 Реализация методов классов и объектов:

 

unit TheIcos;

 

interface

 

Type

TIcos = Class

Private

FSideX: Extended;

Public

Property SideX: Extended Read FSideX Write FSideX;

Function CalculateArea: Extended;

Function CalculateV: Extended; //объем

End;

 

implementation

 

Function TIcos.CalculateArea: Extended;

Begin

Result:=5*(Sqr(FSideX))*(Sqrt(3));

End;

 

Function TIcos.CalculateV: Extended;

Begin

Result:=(5/12)*(3*(Sqrt(5)))*(FSideX*FSideX*FSideX);

End;

 

end.

 

В данном модуле реализованы методы классов и объектов.

 

Private

FSideX: Extended;

 

Это сторона самого объекта.

 

Property SideX: Extended Read FSideX Write FSideX;

Function CalculateArea: Extended;

Function CalculateV: Extended;

 

Это его свойства и функции.

 

Function TIcos.CalculateV: Extended;

Begin

Result:=(5/12)*(3*(Sqrt(5)))*(FSideX*FSideX*FSideX);

End;

 

А это пример функции вычисления объема икосаэдра.

 


Дата добавления: 2015-07-12; просмотров: 63 | Нарушение авторских прав


<== предыдущая страница | следующая страница ==>
Разработка объектной модели| Тестирование программы

mybiblioteka.su - 2015-2024 год. (0.006 сек.)