Основы программирования (947332), страница 60
Текст из файла (страница 60)
12.2.360/2. Разработка библиотеки интерфейсных компонентовЗаписная книжкаСоздать/открытькнижкуЗаписатьтелефонНайтителефон1НРис. 12.1. Окно главного менюГлавноеменюСоздание/открытиефайлаДобавлениезаписейПоискзаписейРис. 12.2. Диаграмма переходов состояний интерфейса:1 - 4 - выбор пунктов «Открытие файла», «Добавление записей», «Поиск записей» и «Выход» соответственно; 5 - выбор пунктов «Выход» наформах «Открытие файла», «Добавление записей», «Поиск записей»Каждая функция будет выполняться в своем окне. По необходимости окна функций будут иметь локальные меню, управление которыми также будетосуществляться с помощью клавиатуры.При выполнении пункта «Создать или открыть книжку» на экране должно появиться окно ввода имени файла (рис.
12.3), причем до ввода именифайла выбор прочих пунктов меню, кроме «Завершения работы», долженбыть блокирован. После ввода имени файла, которое должно быть проверено с точки зрения синтакiliiiilll^сиса имен файлов, программа будет пытаться открыть файл. Если файл с указанным именем не будет обнаружен, то она создаст файл с таким име1©| ^|jijнем.При выборе пункта «Добавление записей» наэкране должна появляться форма ввода записейрис. 12.3, Окно(рис. 12.4), которая содержит поля ввода и локальввода имени файла[;-;:;f ••\*if i ^ r l361Часть 2. Объектно-ориентированное программированиеное меню.
Добавление записей происходитпри выборе пункта «Добавить» локальногоУ •1 1 меню. При этом все поля очищаются, акурсор вновь устанавливается в поле ввода;П|':-:-,1:^^щШщфамилии.Добавляемая информация может бытьне полной, например, может быть известнотолько имя или только фамилия абонента,1 Добавить 1тогда пользователь должен перейти в следующее поле формы, нажав клавишу Enter:Рис. 12.4. Форма вводасоответствующее поле записи файла будетзаписейпустым. После внесения всех записейпользователь должен выбрать пункт «Выход» и вновь вернуться в главноеменю.При выборе пункта «Поиск записей» на экране должна появляться форма поиска (рис. 12.5, а\ которая содержит поле ввода фамилии, имени, полевывода телефона и локальное меню из трех пунктов. Поиск должен осуществляться по вводу фамилии и/или имени.
Начало поиска по выбору пункта«Поиск». Если запись не найдена, то программа должна выдавать сообщениеоб отсутствии данных (рис. 12.5, б). Если необходимо найти несколько записей, то переход к поиску следующей записи осуществляется по выбору пункта «Следующий» (рис. 12.6). После завершения поиска пользователь вновьдолжен вернуться в главное меню, выбрав пункт «Выход».Осуществим объекгную декомпозицию программы.
Будем считать, чтокаждому элементу интерфейса соответствует интерфейсный объект. Полученная при этом диаграмма интерфейсных объектов - результат объектнойи^:ШИсе||::,,'З;;-^^^;;:;:J;;^';;:;;;rt::t;r[•':::: ;:';;,::ШшШШ^'';^^^||'•;;^^a<^n^f-:••'';•:'^;^f^l|||iJ:^^1ш1Ш111111111111Ш11 Найти II Следующийi': •?." ' .::" • •• '••-••''••••yy.y:^!\i'jfi^^^^Рис. 12.5.
Форма поиска записей {а) и сообщение об отсутствииданных (б)36212. Разработка библиотеки интерфейсных компонентов^W1 [Запись \найдена! 2 [Запись шшдена]iВводданных^1[Заг1ись неГJ\ЛВыводданных\найдена]V2 [Запись не найдена]\'Запись ненайдена"-п^5'4Рис. 12.6. Диаграмма перехода состояний для интерфейса пункта «Поиск записей»:1 - выбор пункта «Поидк»; 2 - выбор пункта «Следующий»;3 - выбор пункта «Выход»; 4 - подтверждение получениясообщения об отсутствии данныхдекомпозиции интерфейсной части предметной области программы - приведена на рис. 12.7.Описание объектов начнем с того, что расположим окна в порядке возрастания сложности. При этом просматривается определенная закономерность.Анализ окон показывает, что их четыре вида:а) окно ввода информации (рис.
12.8, а) - пассивное окно, которое должно закрываться при завершении ввода данных (по нажатию Enter);ГлавноеменюАктивизироватьГВводимени файлаЛv,^^^^'АктивизироватьАктивиз ировать ^'"'^^v,^^Добавлениезаписей•"^ПоискзаписейАктивизировать'Сообщение об ]отсутствии^данныхJРис. 12.7. Диаграмма объектов - результат декомпозицииинтерфейсной части предметной области программы363Часть 2. Объектно-ориентированное программированиеВведитеимя-файла:1 1home.dat| |Записная книжкаСоздать/открытькнижкуЗаписатьтелефонНайтителефонДобавлен1ие записейФамилия1 Иванов1 1ФамилияИмя11 1ИмяТелефон1 11 П И !1Телефон1 Добавить]ИванПоиск записейI [ НайтиИвановИванBii^^eM1111111Выход 1 1Рис.
12.8. Определение структуры окон программыб) окно сообщения (рис. 12.8, б) - активное окно, которое ожидает нажатия любой клавиши - подтверждения получения сообщения;в) меню (рис. 12.8, в) - активное окно, которое циклически обрабатывает выбор некоторого пункта пользователем и закрывается при выборе пункта «Выход»;г) форма, включающая окна ввода и меню (рис. 12.8, г, д) - активное окно, которое помимо циклической обработки выбора пункта обеспечиваетвозможность осуществления ввода-вывода информации.Отсюда следует, что достаточно иметь четыре настраиваемых компонента - по одному для реализации объектов каждого вида (рис.
12.9).36412, Разработка библиотеки интерфейсных компонентовЩ|3<?Щ|^^^t^':,'••-•::^. ^^v-Cw. :v|;::::i:v::••:;.;„•;:•::•-:•:'••С^/^:^Гг:г<Л:?^^т:-.г..<текст>''?ШШЩ&ЩЩ^*^^:»ьЩШ:''У¥ШШ$щ|:f::;;';.-i;'?!*^|Ш||:Щ<текст>Ьр-:,Ш:Щ^А'-->Ж| ^^^^^^^^^<текст>< :я»!.*«»«*,л!^^»*^» * * » | * *»!*S»y* *: • * * * *•* '<текст>: : » : - ^ ' > . ::*,:::•••ШШ-МгЩ,,,.^*.,««, , , , , , . » , « , , , . • . , * . .
, » ,<текст> 1.:•.,-:,-...;•::!•:••1^; ••••"•'::•: Ч ]* -.\^^^^^^ИШ й• ;/ \^__\ ,11,,,.,,и,,,,,,ми,,,Рис. 12.9. Обобщенное представление компонентовинтерфейса (пунктиром выделены компонентыввода на форме)Уточнив характеристики интерфейсных компонентов, переходим к ихпроектированию.12.2. Проектирование классовНетрудно видеть, что любое окно на рис. 12.9 включает строку текста.Следовательно, классы для соответствующих объектов можно наследоватьот класса, реализующего окно со строкой текста.Анализ обобщенных представлений также показывает, что каждая форма включает несколько окон с текстом в качестве пунктов меню, окон вводаи т.д.; соответственно помимо наследования при построении классов будемиспользовать композицию.365Часть 2.
Объектно-ориентированноепрограммированиеTWinх1, у1, х2, у2, attr, xt, yt, textDraw(), SetAttr(), Init()TInputinp:TWinDraw(), Init(), Input(),Enov{ \ Clear()TMessageok:TWinDraw(), Init(),RunQTMenunalt, npos,masalt:array[1..10] of TWinRun(), Draw(), EnterQ, InitQITFormninput, masinp:an-ay[1..5] ofTInputDraw(), EnterO, Input(), CIear(), Init()Рис.
12.10. Иерархия классов для реализации простейших интерфейсныхэлементовДля реализации каждого вида окон будем строить свой класс.Вспомогательный базовый класс TWin, реализующий окно с текстом,должен содержать поля для хранения координат окна, цвета фона, цвета символов, координат начала текста и самой строки текста. Цвет фона и цвет символа будем хранить в одном поле attr в виде атрибута - см. параграф 8.1. Длявывода окна класс должен включать метод Draw, для изменения цвета окна метод SetAttr. Инициализацию полей будет выполнять метод Init (рис. 12.10).Класс для реализации окна ввода TInput наследуем от TWin и включимв него объектное поле inp типа TWin, которое будет содержать введенное имяфайла в качестве текста (на рис.
12.10 композиция не показана, чтобы не затенять общую картину). Класс будет определять свои собственные методыинициализации Init и рисования Draw, так как он должен рисовать два окнас текстом и соответственно хранить информацию о них. Кроме этого классдолжен включать метод ввода Input, метод проверки правильности вводаError, метод очистки поля ввода Clear, которые будут обеспечивать ввод информации.Класс для реализации сообщения TMessage также наследуем от TWin.Объектное поле ок введено для подтверждения получения сообщения. Классбудет включать методы вывода окна Draw, инициализации полей Init и методRun, обеспечивающий выход по нажатию любой клавиши.Класс для реализации меню TMenu будем наследовать от TWin, так какесли его наследовать от TMessage, то объекты будут содержать лишнее полеок.
Этот класс будет включать несколько, например десять, объектных полейтипа TWin, собранных в массив masalt. Каждое из полей ~ пункт меню. Количество реально существующих пунктов будем хранить в специальном поле nalt. В процессе работы с меню необходимо также знать номер выделен36612. Разработка библиотеки интерфейсных компонентовного пункта меню проз.
Метод Run будет обеспечивать работу с меню. Длявывода меню на экран он будет вызывать метод Draw, также переопределенный в данном классе. Каждый раз при выборе пункта меню метод Run будетвызывать метод Enter, который обеспечит выполнение требуемых действий.Для инициализации полей класса TMenu переопределим метод Init.Класс для реализации форм ввода и поиска TForm наследуем от TMenu,чтобы повторно не описывать работу с меню.
Для ввода-вывода информациидобавим окна ввода, объединенные в массив masinp, количество используемых окон ввода будем хранить в поле ninput. Метод Run данный класс будетнаследовать, а вызываемые из него методы Draw и Enter - переопределять.Следовательно, и в классе TMenu, и в классе TForm методы Draw и Enterдолжны объявляться виртуальными полиморфными (1-й случай обязательного использования позднего связывания). Кроме реализации меню классTForm должен обеспечивать выполнение операций ввода-вывода. Следовательно, он будет включать методы ввода Input и очистки полей Clear.При проектировании классов те методы, реализация которых будет зависеть от конкретной задачи, программируются не содержащими действий (абстрактными). Предполагается, что они будут переопределяться при наследовании класса от библиотечного.12.3.
Реализация универсальных интерфейсных компонентовКлассы будем описывать в отдельных модулях. Это позволит включать впрограмму описания только тех классов, которые в ней будут использоваться.К л а с с T W i n описываем в модуле Win: в интерфейсной части - само описание класса, а в части реализации - методы класса.Unit Win;InterfaceUses crt;Type str80=stnngf80J;TWin-=Objectxly yly x2, у2:integer; {координаты окна}attr: integer;{атрибут}xt, yt:integer;{начало текста}text:str80;{строка текста}procedure Init (ax 1, ay I, ax2, ау2, aattr, axt, ayt: integer;atext:str80);procedure SetAttr(aattr:integer); {изменение цвета и фона окна}procedure Draw;{вывод окна на экран}End;367Часть 2, Объектно-ориентированное программированиеImplementationProcedure TWinJnit; {инициализация полей}Beginх1:'=^ах1;у1:-^ау1;х2:='ах2;у2:^ау2;attr:-aattr;xt:=axt;yt:=ayt;text:==atext;End;Procedure TWin.Draw; {вывод окна на экран}BeginTextBackGround(attr div 16);TextColorfattr mod 16);Window(xl,yl,x2,y2);Clrscr; {выделение окна}Gotoxy(xt,yt);Write (text);{вывод строки текста}end;Procedure TWin.Setattr; {изменение цвета фона и текста}Beginattr: =aattr; {изменение атрибута}Draw;{вывод окна с другим атрибутом}end;EndК л а с с T I n p u t описываем в модуле Input.
![](https://s.studizba.com/z.php?f=/templates/si/i/noavatar.png&w=100&h=100&t=1"){kind=avatar}
