Из опыта создания универсальных тестовых редакторов — страница 12

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

методов- названия процедур объекта, позволяющих работать с полями, поскольку прямой доступ к полям нежелателен. Объект объявляется следующим образом: Объект. Type <имя объекта>=object <поля данных> <заголовки методов> End; После объявления объекта к нему пишутся процедуры (методы). Название процедуры состоит из двух частей: имени объекта и имени процедуры: <Имя объекта>.<Имя процедуры> Объектная программа. Объектная

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

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

координату в соответствии с нажатыми клавишами. А также есть процедура выбора, при нажатии клавиши Enter управление передается ей. Она в свою очередь определяет по координате окна какую функцию необходимо запустить в данный момент. Этапы разработки объекта Панель Управления: 1.     Определение ключевого поля перемещения окна 2.     Определение процедур работы с окном 3.     Определение пропорций окна

панели управления 4.     Рисование панели управления 5.     Написание процедур работы с окном выбора 6.     Установка связей между функциями и объектом 7.     Отладка объекта Программный код. Program redactor; uses crt,printer,dos; type panel=object {объявление объекта} x:integer; {поле объекта} Procedure left(b:char); {описание процедуры сдвига влево окна выбора} Procedure right(b:char); { описание процедуры сдвига вправо окна выбора } Procedure choose; {