Введение в технологию программирования. Часть 3. Проект OLYMPUS-D. Коржов Е.Н - 45 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

45
Все другие модули проекта не имеют соответствующих форм и в биб-
лиотеке
CRONUS являются модулями-«пустышками». Для их создания
в среде Delphi выполняется команда
FILE -> New -> Unit .
Каждый модуль сохраняется в рабочей папке (каталоге проекта) в от-
дельном одноименном файле с расширением .
pas.
Представим тексты модулей-пустышек.
unit DECLAR;
{
Назначение: Описание и объявление нестандартных типов и глобаль-
ных данных и объектов
Автор: Фамилия Имя Отчество, организация, подразделение
Версия: 01.01
Дата: 20.11.07
}
inferface
var
EndExp {Окончание вычислений} : Boolean;
EndRun {Завершение компьютерного эксперимента} :
Boolean;
implementation
end.
В модуле описаны две управляющие переменные булевского типа. Их
значения, соответствующие значению
True, означают возникновение со-
бытия окончания вычислений в соответствии с разработанным алгоритмом
или завершения сеанса компьютерного эксперимента.
unit CONTROL;
{
Назначение: Организация последовательности выполнения процедур
комплекса
Автор: Фамилия Имя Отчество, организация, подразделение
Версия: 01.01
Дата: 20.11.07
}
inferface 
    Все другие модули проекта не имеют соответствующих форм и в биб-
лиотеке CRONUS являются модулями-«пустышками». Для их создания
в среде Delphi выполняется команда

                     FILE ->    New ->     Unit .

    Каждый модуль сохраняется в рабочей папке (каталоге проекта) в от-
дельном одноименном файле с расширением .pas.

    Представим тексты модулей-пустышек.

unit DECLAR;
{
   Назначение: Описание и объявление нестандартных типов и глобаль-
                ных данных и объектов
   Автор: Фамилия Имя Отчество, организация, подразделение
   Версия: 01.01
   Дата: 20.11.07
}
inferface
     var
        EndExp                  {Окончание вычислений} : Boolean;
        EndRun {Завершение компьютерного эксперимента} : Boolean;
implementation
end.

    В модуле описаны две управляющие переменные булевского типа. Их
значения, соответствующие значению True, означают возникновение со-
бытия окончания вычислений в соответствии с разработанным алгоритмом
или завершения сеанса компьютерного эксперимента.

unit CONTROL;
{
   Назначение: Организация последовательности выполнения процедур
                комплекса
   Автор: Фамилия Имя Отчество, организация, подразделение
   Версия: 01.01
   Дата: 20.11.07
}
inferface

                                     45

Страницы