- •Курсовая работа
- •1.1 Постановка задачи
- •1.2 Блок- схема алгоритма.
- •2.1 Введение в bp 7.0
- •2.3 Листинг программы
- •2.3 Коментарии к программе
- •3.1 Введение в Borland Delphi 4
- •3.2 Листинг программы
- •3.3 Коментарии к программе
- •4.1 Введение в Borland Pascal с использованием модуля Turbo Vision
- •4.2 Листинг программы
- •4.3 Коментарии к программе
4.3 Коментарии к программе
При решении нашей задачи мы воспользовались следующим набором стандартных модулей входящих в состав TurboVision:
Objects: Модуль Objects содержит основные определения объектов Turbo Vision, включая базовый объект иерархии Turbo Vision TObject, а так же все невидимые элементы Turbo Vision: потоки, коллекции и ресурсы. TObject – это абстрактный базовый тип без полей. Это предок всех объектов Turbo Vision, за исключением TPoint и TRect. TObject
предоставляет 3 метода: Init, Free и Done. Конструктор Init формирует основу для всех конструкторов Turbo Vision, выполняя распределение памяти. Free освобождает это распределение. Done - это абстрактный деструктор, который должен быть перекрыт в
потомках. TPoint – этот объект представляет точку. Его поля X и Y определяют (X, Y) координаты позиции экрана. TRect - этот объект представляет прямоугольник. Его поля A и B – это объекты типа TPoint, определяющие верхнюю левую и нижнюю правую точки прямоугольника.TRect имеет методы: Assign, Copy, Move, Grou, Intersect, Union, Contains, Equals и Empty.
Drivers: МодульDriversсодержит все специализированные драйверыTurboVision, включая драйверы мышки и клавиатуры, поддержку экрана и систему обработки ошибок с монитором событий для программ, управляемых событиями.
Views: МодульViewsсодержит основные компоненты видимых элементов. Это оба абстрактных типа, таких какTViewиTGroupи полезные компоненты более сложных групп, таких как рамки окон и полосы скроллинга. Видимый элемент - это любой объект, который может быть нарисован (отображен) в прямоугольной части экрана. Тип видимого объекта должен наследоваться отTView. СамTView- это абстрактный объект, представляющий пустую область экрана.TGroupпозволяет обрабатывать динамически созданный список связанных интерактивных подэлементов через назначенный видимый
элемент, называемый владельцем группы. Каждый видимый элемент имеет поле OwnerтипаPView, которое указывает на владельца типаTGroup. Указатель со значениемnilозначает, что видимый элемент не имеет владельца.
Dialogs: МодульDialogs обеспечиваетTurboVisionнабором диалоговых окон.
App: МодульApp(предоставлен в исходных кодах) обеспечивает элементы оболочкиTurboVision. Все очень мощные объектные типы определены вApp, включая объектыTApplicationиTProgram, которые служат в качестве программTurboVisionи объектов панели экрана, который управляет большинством элементов в оконных программах.
В программе мы использовали объект TProg=object(TApplication) и объект TDial=object(TDialog). Объекты этих типов сделаны динамическими. В первом случае мы заменяем стандартный для объекта Tapplication метод-конструктор Init на свой, а во втором стандартный метод HandleEvent, на метод, подходящий нам.
http://www.citforum.ru/programming/tv_doc
Borland Pascal 7.0 Help
http://www.citforum.ru/programming/tv_doc
http://oasis.bos.ru/
Фаронов В. В. - Turbo Pascal 7.0 (ч1, ч2), «Нолидж», 1999г.
Самсонов А. И. и др. - Программирование в среде Delphi 4.0, М., 2000г.