50.Метод Draw класса tCanvas.

procedure Draw(X, Y: Integer; Graphic: Tgraphic) ;

Осуществляет рисование графического объекта Graphic (точнее, вызов метода его рисования) в области с верхним левым углом (X, Y)

Image1.Canvas.Draw(0, 0, BMap)

51. Метод Draw класса TCanvas.Draw(x, y, Graphic: TGraphic);- прорисовка графического объекта Graphic так, чтобы левый верхний угол располагался в (x, y). Объект Graphic может быть типа Bitmap, Icon и Metafile.StretchDraw(Rect: TRect; Graphic: TGraphic);- вычерчивание и масштабирование объекта Graphic до полного заполнения Rect.Пример. На форме имеется Image1. С помощью свойства Picture в нее помещена картинка. Требуется переместить эту картинку в другое положение.

Procedure TForm1.FormPaint( );\/begin\/ with Canvas do\/ begin\/

Draw (0, 0, Image1.Picture.Bitmap);\/ StretchDraw (Rect(250,0,350,50), Image1.Picture.Bitmap);\/ end;\/end;

52.Метод Ellipse класса TCanvas.Ellipse(x1, y1, x2, y2) - рисует эллипс. Метод рисует сегмент эллипса. Эллипс определяется описывающим прямоугольником (X1.Y1)— (Х2, Y2); его размеры должны лежать в диапазоне от 2 до 32 767 точек. Начальная точка сегмента лежит на пересечении эллипса и луча, проведенного из его центра через точку (ХЗ, Y3). Конечная точка сегмента лежит на пересечении эллипса и луча, проведенного из его центра через точку Х4, Y4). Сегмент рисуется против часовой стрелки

53Метод FillRect класса TCanvas.

FillRect(Rect);-закрашивание прямоугольника: Rect: TRect;

Left, Top, Right, Bottom

Свойства фона нужно задать, используя Canvas.Brush

54Метод LineTo класса TCanvas.

LineTo(x, y)

- рисует линию из текущего положения пера в точку с координатами x и y. . При этом текущая точка перемещается в конечную точку линии и новый вызов LineTo будет проводить точку из этой новой текущей точки.

55.Метод MoveTo класса TCanvas.

 procedure MoveTo(X, Y: Integer); - перо ставится на точку с коорд. X, Y (необходимо перед началом рисования некоторых линий, например, отрезка прямой - см LineTo)

 procedure LineTo(X, Y: Integer); - проводится отрезок прямой в точку с коорд. X, Y (см MoveTo)

56. Метод Pie класса TCanvas.

Pie(x1, y1, x2, y2, x3, y3, x4, y4);- рисует сектор эллипса.

procedure Pie (XI, Yl, X2, Y2, X3, Y3, X4, Y4: Integer); Рисует сектор эллипса, описываемого прямоугольником (Х1, Y1) — (Х2, Y2). Стороны сектора лежат на лучах, проходящих из центра эллипса через точки (ХЗ, Y3) и (Х4, Y4)

57.Метод Polygon класса TCanvas.Polygon(Point: array of TPoint);

-вычерчивание заданного многоугольника.Пример.

Var\/ P: array[1..3] of TPoint;\/begin\/ P[1].x := 10; P[1].y := 300;\/

P[2].x := 200; P[2].y := 300;\/ P[3].x := 100; P[3].y := 20;

Canvas.Poligon(P);

end;

58. Метод Polyline класса TCanvas.Polyline(Point: array of TPoint);- Метод Polyline рисует на канве кусочно-линейную кривую по множеству точек, заданному массивом Points. Отличие метода Polyline от метода Polygon заключается в том, что метод Polygon замыкает конечные точки, а метод Polyline - нет. Рисование проводится текущим пером Реn. Метод не изменяет текущей позиции PenPos пера Реn. Метод позволяет рисовать кусочно-линейный график функции, хранящийся в массиве элементов типа TPoint. То, что делает метод Polyline, можно сделать и с помощью методов MoveTo и LineTo, подведя сначала перо к первой точке, а затем последовательно выполняя LineTo. Различие будет заключаться в том, что метод Polyline не изменит текущую позицию пера, а методы MoveTo и LineTo изменят.

59. Метод Rectangle класса TCanvas.Rectangle (XI, Yl, X2, Y2: Integer);Рисует прямоугольник с верхним левым углом в (Х1, Y1) и нижним правым в (Х2, Y2)