46. Модуль Graph. Построение графических фигур. Построение прямоугольников

Цвет, стиль и толщина линии для вычерчивания берутся по умолчанию или устанавливаются соответственно процедурами SetColor и SetFillPattern, SetFillStyle (ниже).

Процедура вычерчивания одномерного прямоугольника:

Rectangle(Xl, Y1, Х2, Y2:integer),

где XI, Y1 — координаты левого верхнего угла,

Х2, Y2 — координаты правого нижнего угла прямоугольника. Область внутри прямоугольника не закрашена и совпадает по цвету с фоном.

Построение многоугольников

DrawPoly(NumPointst : word; var PolyPoints)

Параметр PolyPointsявляется нетипизированным параметром, который содержит координаты каждого пересечения в многоугольнике. ПараметрNumPointsзадает число координат вPolyPoints. Необходимо помнить, что для вычерчивания замкнутой фигуры с N вершинами нужно передать при обращении к процедуреDrawPolyN+1 координату, где координата вершины с номеромnбудет равна координате вершины с номером 1. Построение дуг и окружностей

Окружность:

Circle (X, Y, Radius: word);

где X и Y — координаты центра окружности,

Radius — ее радиус.

Пример вывода ярко-зеленой окружности с радиусом 50 пикселей и центром в точке 450,100:

SetColor(LightGreen);

Circle(450,100,50)

Дуга:

Arc (X,Y: integer; StAngle, EndAngle, Radius: word);

где X,Y— центр окружности,

StAngleиEndAngleначальный и конечныйyгол в градусах,

Radius — радиус.

Пример:

SetColor(Red);

Arc(450,100,0,90,50);

Эллиптическая дуга:

Ellipse (X,Y:integer; StAngle,EndAngle:word; xR,yR:word);

где X, Y — центр эллипса в дисплейных координатах,

xR и yR — горизонтальная и вертикальная оси.

Фон внутри эллипса совпадает с фоном экрана.

47.Модуль Graph.Работа с фрагментами изображения.

Для определения размера памяти, необходимой для сохранения образа фрагмента служит функция ImageSize (XI, Yl, X2, Y2: Integer):Word, байт.

Сохранение образа фрагмента в памяти выполняется процедурой

GetImage (XI, Yl, x2, y2: Integer; var BitMap);

Параметры XI, Yl, X2, Y2 определяют прямоугольную область экрана.

Процедура PutImage (X, Y:integer; var bitmap; Oper :word) - выводит из буфера на экран двоичный образ заданной области экрана.

48. Строки: определение, операции со строками, процедуры и функции для обработки строк.

Тип данных STRING(строка) предназначен для обработки строк (цепочек символов).

Обработка строковых данных - необходимый элемент программ, работающих с текстами:

- Программы лингвистического анализа текстов;

- Текстовые редакторы;

- Программы, работающие в диалоговом (интерактивном) режиме;

- Программы, содержащие текстовые пояснения результатов своей работы.

Строка – последовательность символов (от 0 до 255), заключенная в апострофы.

При составлении программ используются строковые константы и строковые переменные.

Строковые константы – элементы данных, значения которых известны заранее, описаны в разделе описания констант и в ходе выполнения программы не изменяются.

Операции со строками

Выражения, в которых операндами служат данные строкового типа - строковые выражения.

Строковые выражения могут состоять из:

- строковых констант;

- строковых переменных;

- знаков операций;

- указателей процедур;

- указателей функций.

Над строковыми данными допустимо выполнять операции сцепления и операции отношения.

Операции сцепления (+) применяются для сцепления нескольких строк в одну результирующую строку, длина которой не должна превышать 250 символов.

Функции для обработки строк

LENGTH(ST) - вычисляет длину в символах строкиST. Результат – целочисленного типа.

Например, при ST, равном ‘длина строки’, выражениеLENGTH(ST) дает результат 12.

COPY(ST,POZ,N) – выделяет из строкиSTподстроку длинойNсимволов, начиная с позиции

POZ.POZ,N– целочисленные выражения.

Если POZ>LENGTH(ST), то результатом будет пробел;

Если POZ> 255, возникнет ошибка при выполнении.

Например, при значении ST= ‘ABCDEFG’, выражениеCOPY(ST,2,3) дает результат ‘BCD’.

CONCAT(STR1,STR2,…,STRN) – выполняет конкатенацию (сцепление) строкSTR1,STR2,…,STRNв том порядке, в каком они указаны в списке параметров. Сумма символов всех сцепляемых строк должна быть не более 255.

Например, выражение CONCAT(‘AA’, ’BB’, ’CC’) дает результат ‘AABBCC’.

POS(ST1,ST2) – обнаруживает первое появление в строкеST2 подстрокиST1.

Результат целочисленного типа и равен номеру той позиции, в которой находится первый символ подстроки ST1. Если вST2 не найденоST1, то результат равен 0. Например, для значенияST2 ‘ABCDEFGH’ выражениеPOS(‘DE’,ST2) дает результат, равный 4.

UPCASE(CH) - преобразует строчную букву в прописную. Параметр и результат имеют тип

CHAR. Обрабатывает только буквы латинского алфавита.

Например, для значения CH= ‘f’, выражениеUPCASE(CH) дает результат ‘F’.