Из опыта создания универсальных тестовых редакторов
Writeln(f); {вывод на экран}
c1:=true; {подтверждение
запроса}
End;
f1:=''; {обнуление строки}
End;
If c1=false Then Write('Запрос не найден. Пройдите тест.');
{в случае отсутствия фамилии в списке}
Readln;
close(b1); {закрытие файла}
Window(5,10,70,13); {закрытие окна}
TextBackGround(Black);
clrscr;
End;
Задачи: выделение фамилии из строки путем поиска пробела, поиск
соответствия фамилий и вывод результатов поиска на экран.
Проблемы: никаких
Функция печати данных. В Turbo Pascal имеются средства для работы с
принтером. Это ключевое слово Lst, указывающиеся в операторе вывода
Writeln. Следуя этой инструкции, компилятор посылает сообщения не на экран,
а на принтер. Этот способ имеет существенный недостаток: данные передаются
очень медленно. Также в языке нет определенной команды для окочания работы
принтера, поэтому бумага остается внутри и приходится использовать внешние
управляющие кнопки принтера. Программа просит указать путь к файлу, а затем
распечатывает его.
Я нашел другой алгоритм работы с принтером, более быстрый, но он требует
знаний языка Assembler, встроенного в Turbo Pascal:
Procedure PrintF;
Begin
TextColor(black);
Window(10,10,53,15); {начальное окно}
TextBackGround(cyan);
clrscr;
Writeln('Какой файл распечатать?'); {вывод запроса}
Window(60,24,70,24);
TextBackGround(black);
clrscr;
repeat {вывод времени}
h:=g3;
GoToXY(50,22);
GetTime(g1,g2,g3,g4);
TextColor(yellow);
Write(g1,':',g2,' ',g3);
Delay(1000);
clrscr;
until keypressed;
Window(10,10,53,15); {открытие окна ввода}
TextBackGround(cyan);
clrscr;
Readln(a); {ввод пути к файлу}
Assign(b1,a); {связь переменной с файлом}
Reset(b1); {открытие файла для чтения}
Writeln('убедитесь что ваш принтер настроен для работы в MS-DOS');
{предупреждение}
repeat {цикл работы с файлом}
Window(60,24,70,24); {закрытие окна}
TextBackGround(black);
clrscr;
h:=g3;
GoToXY(50,22);
GetTime(g1,g2,g3,g4); {вывод времени}
TextColor(yellow);
Write(g1,':',g2,' ',g3);
clrscr;
Readln(b1,f); {считывание символа}
Writeln(Lst,f); {распечатывание символа}
until EOF(b1);
Window(10,10,53,15); {закрытие окон}
TextBackGround(black);
clrscr;
End;
Проблемы: отсутствие команды для окончания работы принтера, малая скорость
печати. Решение- в языке ассемблер.
Новые объектные концепции.
Современные технологии разработки программного обеспечения опираются в
основном на идеи структурного программирования. К ним, в первую очередь,
относятся: функциональная модульность, структурированность программ и
данных, насыщенность текстов программ комментариями, открытость, надежность
и т. д. Широко используемым примером такой технологии является технология
«сверху-вниз». Ее суть заключается в постепенной пошаговой детализации
функций, выполняемых программной системой. Серьезными недостатками
технологии «сверху-вниз» являются недостаточное внимание к проектированию
структур данных и слабая их связь с процедурами обработки.
Гармоничное включение в структуру языка средств объектно-ориентированного
программирования делает переход от традиционных технологий программирования
к объектно-ориентированному для тех, кто программирует на Турбо Паскале,
достсаточно безболезненным. А то, что такой переход назрел, сомнений не
вызывает. Мощные пакеты инструментальных средств, такие как Turbo Vision и
Object Toolkit, способствует внедрению объектно-ориентированных методов в
процессе разработки программ. Кроме того, опрос американских программистов,
проведенный осенью 1991 года, показал, что в 1992 году более половины из
них планирует включить средства объектно-ориентированного программироваиня
в свой арсенал, поскольку считают, что это будет способствовать ускорению
разработки.[4]
Понять основы объектного программирования вам поможет учебник по Delphi
5. Важнейшими понятиями объекта являются принцип наследования, полиморфизм,
поля, методы, свойства и события объекта. В языке Turbo Pascal не полностью
реализован данный подход к программированию.
Наиболее важным понятием объектно-ориентированного программирования
является понятие объекта. Объект представляет собой совокупность данных и
подпрограмм, предназначенных для работы с этими данными. Главным
достоинством объекта является то, что он позволяет моделировать абстрактные
ситуации. Это делает объектный подход к программированию довольно удобным
для большинства программистов, хотя очень трудно понять объектный подход
тем, кто ранее программировал на структурных языках. Тем более, что найти
какой-либо справочный материал по объектам очень сложно. Поэтому я приведу
основы понятия объекта.
Объект в Turbo Pascal состоит из имени, полей данных и методов. Поля
данных это ете же переменные в программе, на которые опирается объект.
Заголовки методов- названия процедур объекта, позволяющих работать
| |  скачать работу |
Из опыта создания универсальных тестовых редакторов | 
