Графика и мультимедиа в Delphi

Графика в Delphi.

Для отображения графической информации в библиотеке Delphi предусмотрены компоненты, список которых дан в таблице.

Компоненты отображения графической информации	Компонент	Страница
Image (изображение)	Additional	Используется для отображения графики: пиктограмм, битовых матриц и метафайлов.
PaintBox (окно для рисования)	System	Используется для создания на форме некоторой области, в которой можно рисовать.
DrawGrid  (таблица рисунков)	Additional	Используется для отображения в строках и столбцах нетекстовых данных.
Chart (диаграммы и графики)	Additional	Компонент принадлежит к семейству компонентов TChart, которые используются для создания диаграмм и графиков.

Свойство Canvas (канва, холст), представляющие собой область компонента, на которой можно рисовать или отображать готовые изображения.

Канва обеспечивает:

§  загрузку и хранение графических изображений;

§  создание новых и изменение имеющихся изображений с помощью пера, кисти, шрифта;

§  рисование и закраску различных фигур, линий, текстов;

§  комбинирование различных изображений.

Каждая точка канвы имеет координаты Х и Y. Система координат канвы имеет началом левый верхний угол канвы. Координата Х возрастает при перемещении слева направо, а координата Y – при перемещении сверху вниз. Координаты измеряются в пикселах.

Для того чтобы вывести на поверхность объекта графический элемент, необходимо применить к свойству Canvas этого объекта соответствующий метод.

procedure TForm1.FormPaint(Sender: TObject);

begin

with canvas do   

begin          …      end;

end;

Одиннадцать основных цветовых констант:

clBlack – черный;                 clMaroon – коричневый;               clRed – красный;

clGray – серый;                    clGreen – темно-зеленый;              clYellow – желтый;

clBlue – синий;                      clLime – светло-зеленый;               clWhite – белый;

clAqua – голубой;                clFuchsia – фиолетовый.

TextOut

Используется для вывода текста на поверхности графического объекта.

TextOut(x,y, ’Текст’), где х,у – координаты точки графической поверхности, от которой выполняется вывод текста.

Шрифт, который используется для вывода текста, определяется значением свойства Font.

Pen

Карандаш используется для вычерчивания точек, линий, контуров геометрических фигур: дуг, эллипсов, окружностей, прямоугольников и др. Свойства объекта TРen:

Color	Цвет линии	Style	Вид линии
Width	Толщина линии	Mode	Режим отображения

Style определяет стиль линии, который можно задать именованной константой.

psSolid	Сплошная линия
psDash	Пунктирная линия, длинные штрихи
psDot	Пунктирная линия, короткие штрихи
psDashDot	Пунктирная линия, чередование длинного и короткого штрихов
psDashDotDot	Пунктирная линия, чередование одного длинного и двух коротких штрихов
psClear	Линия не отображается

Brush

Кисть используется методами, обеспечивающими вычерчивание замкнутых областей и обладает двумя свойствами. Свойства кисти:

Color

Цвет закрашивания замкнутой области

Style

Стиль заполнения области

Константы, позволяющие задать стиль заполнения области:

bsSolid	Сплошная заливка
bsClear	Область не закрашивается
bsHorizontal	Горизонтальная штриховка
bsVertical	Вертикальная штриховка
bsFdiagonal	Диагональная штриховка с наклоном линий вперед
bsBDiagonal	Диагональная штриховка с наклоном линий назад
bsCross	Горизонтально-вертикальная штриховка в клетку
bsDiagCross	Диагональная штриховка, в клетку

LineTo

Вычерчивает прямую линию от текущей позиции карандаша в точку с координатами.

LineTo(x,y), где х,у – координаты конца отрезка.

Начальную точку линии можно задать, переместив карандаш в нужную точку графической поверхности при помощи метода MoveTo(x,y).

Прямоугольник

Rectangle(x1,y1,x2,y2), где:

x1, y1 и y2, у2 — координаты левого верхнего и правого нижнего углов прямоугольника.

Прямоугольник со скругленными углами

RoundRect(x1,y1,x2,y2,x3,y3), где:

·        x1, y1, х2, у2 — параметры, определяющие положение углов прямоугольника, в который вписывается прямоугольник со скругленными углами;

·        х3 и у3 — размер эллипса, одна четверть которого используется для вычерчивания скругленного угла

Эллипс, окружность

Ellipse(x1,y1, x2,y2), где x1,y1, x2,y2 – координаты прямоугольника, внутри которого вычерчивается эллипс или, если прямоугольник является квадратом, окружность.

Дуга

Arc(x1,y1,x2,y2,x3,y3,x4,y4), где:

·        xl, yl, х2, у2 — параметры, определяющие эллипс (окружность), частью которого является вычерчиваемая дуга;

·        х3, у3 — параметры, определяющие начальную точку дуги;

·        х4, у4 — параметры, определяющие конечную точку дуги.

Начальная (конечная) точка — это точка пересечения границы эллипса и прямой, проведенной из центра эллипса в точку с координатами х3 и у3 (х4, у4). Дуга вычерчивается против часовой стрелки от начальной точки к конечной.

Цвет, толщина и стиль линии, которой вычерчивается дуга, определяются значениями свойства Реn поверхности (canvas), на которую выполняется вывод.

Мультимедиа-возможности Delphi.

Компонент Animate, значок которого находится на вкладке Win32 позволяет воспроизводить простую анимацию (обеспечивает воспроизведение только изображения), кадры которой находятся в AVI-файле.

Компонент MediaPlayer, значок которого находится на вкладке System позволяет воспроизводить видеоролики, звук и сопровождаемую звуком анимацию (AVI, MIDI и WAVE файлы).