4.16.2.3.4.2. Класс t Canvas.

4.16.2.1.Свойства:

1. Pen Pos: T Point (структура, состоящая из двух longов, т.е. это координаты текущей точки).Это свойство Read only, можно его модифицировать с помощью Move to.

Холст. Pen Pos. Х (получаем абсциссу текущей точки).

2. ClipRect: T Rect (ограничивает область отображения, то есть область видимости холста). Это свойство имеет значение, когда необходимо что-нибудь промасштабировать, а для этого нужно знать размеры области.

3. Pixels (Х,Y: Integer) : T Color ( двухмерный массив, и каждая точка имеет тип T Color ). Можно посмотреть, какого цвета текущая точка.

4. Brush : T Brush (для заливки)

Pen : T Pen (для границ)

Font : T Font (шрифт)

5. Copy Mode : T Copy Mode – режим копирования.

4.16.3.3.4.3. Класс T Brush.

4.16.3.1.Свойства:

1. Bit map: T Bit map

2. Style: T Brush Style

3. Color: T Color

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

4.16.3.2.Метод:

Assigne.

Brush1. Assigne (Brush2) – то есть свойства Brush2 становятся свойствами Brush1.

4.16.4.3.4.4. Класс T Pen.

4.16.4.1.Свойства:

1. Style: T Pen Style (стили и линии)

2. Color: T Color (цвет линии)

3. Width: Integer (ширина линии)

4. Mode: T Pen Mode – режим рисования (свойство может принимать одно из предопределенных значений), то есть каким образом будут взаимодействовать пикселы линии с пикселами холста, по которому проходит эта линия.

4.16.5.3.4.5. Методы класса T Canvas.

Arc – дуга.

Draw (X,Y: Graphic; T Graphic)

Flood Fill (заполнение области).

Лекция № 13.

4.16.6.3.4.6. Пример.

Задание: нарисовать российский военно-морской флаг.

Создадим форму, кнопку, при нажатии на которую будет появляться изображение флага.

With Canvas do begin

Move To (0, 0);

Line To (Client Width, Client Height);

Move To (Client Width, 0);

Line To (0, Client Height);

End;

Этот фрагмент программы необходим для избежания повторения в каждой строке слова Canvas.

1. Pen.Width:=50

Pen. Color:=clBlue;

2. Flood Fill(10,10,fs Surfase

fs Border).

4.16.7.Пример 2.

Построение полилинии.

Холст.PoliLine (array of T Point);

T Point = record

X: longint;

Y: longint; - массив записи.

End;

Процедура PolyLine имеет в параметрах открытый массив и создает незамкнутую полилинию.

With Image1. Canvas do begin

Poli Line([Point(10,10), Point(20,10), Point(30,50), Point(40,70)]);

End;

______________

Выписать описания массивов:

Var

X: array{1...100}of real;

Y: array{1...100}of real;

P: array{1...100}of T Point;

___________________

Заполнение массива P:

For i:=1 to N do begin

P{i}:=Point(Round(X{i}); Round(Y{i}));

End;

PoliLine(Slise(P, N));

4.16.7.1.Масштабирование:

X*(client Width)/maxX – minX

(X - minX) *(client Width)/maxX – minX (сдвиг к началу).

Аналогично масштабируем по Y.

Лекция № 14.

4.17.1.6. Справочные системы.

Очень важная составляющая справочной системы - это качественный интерфейс, т. е.

1. Стандартный интерфейс (сохранение, восстановление и т. д. должны быть на знакомом месте).

2. Целостный интерфейс (разные действия в рамках одной и той же программы должны выполняться сходным образом).

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