Лабораторная работа №9

“Программирование с использованием модулей. Разработка пользовательского интерфейса”

Цель работы: Освоение методов составления программ с использованием стандартных и нестандартных модулей, а также закрепление навыков разработки и отладки программ с расширенным пользовательским интерфейсом.

1. Теоретическая часть

1.1. Использование стандартных модулей в языке программирования Pascal. Модуль crt.

В Pascal имеется ряд стандартных модулей, в которых описано большое количество встроенных констант, типов, переменных и подпрограмм. Все модули (кроме System, который подключается автоматически) становятся доступны только после указания их имен после слова USES.

В модуле CRT сосредоточены процедуры и функции, обеспечивающие управление текстовым режимом работы экрана (управление экраном, звуком, клавиатурой). Модуль Crt содержит ряд процедур, позволяющих задавать цвет символов и экрана, очищать экран, менять позицию курсора и др.

Коды цветов:

0 – Black 1 – Blue 2 – Green

3 – Cyan 4 – Red 5 – Magenta

6 – Brown 7 – LightGray 8 – DarkGray

9 – LightBlue 10 – LightGreen 11 – LightCyan

12 – LightRed 13 – LightMagenta 14 – Yellow

15 – White

Основные функции и процедуры модуля Crt.

ClrScr – очищает текущее окно, заполняет его цветом фона и помещает курсор в верхний левый угол.

Delay (MS : word) – приостанавливает выполнение программы на указанное в миллисекундах время.

GotoXY (x, y : byte ) – перемещает курсор к месту экрана по заданным координатам.

LowVideo – устанавливает низкую яркость символов.

HighVideo – устанавливает высокую яркость изображения.

NormVideo – устанавливает первоначальную яркость.

TextBackground (color : byte) – задает цвет фона.

TextColor (color : byte ) – задает цвет символа.

TextMode (Mode : word) – задает требуемый текстовый режим. Текстовые режимы и их коды зафиксированы в справочниках по Паскалю.

Window (x1,y1,x2,y2 : byte ) – задает размеры окна.

KeyPressed : boolean – анализирует нажатие клавиши клавиатуры.

ReadKey : char – считывает символ клавиатуры.

WhereX : byte – возвращает текущую координату Х курсора.

WhereY : byte – возвращает текущую координату Y курсора.

Использование клавиш

Каждая клавиша клавиатуры имеет свой собственный код. Коды клавиш можно узнать в таблицах, справочниках и т.п..

Используя нажатие клавиши можно управлять работой программы. Например, фрагмент программы:

k:= ReadKey;

if k=#13 {Enter} then clrscr;

if k=#27 {Esc} then exit;

анализирует нажатую клавишу и если была нажата клавиша Enter (код #13), то выполняется очистка экрана, а если была нажата клавиша Esc (код #27), то программа прекращает работу.

1.2. Использование нестандартных модулей в языке программирования Pascal.

Модуль – это законченная по смыслу часть программы, оформленная в виде отдельного файла, элементы которого при определенных условиях можно использовать в других программах.

Модуль состоит из 4 частей: заголовок модуля, интерфейс, исполнительная часть, секция инициализации.