Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Методы класса TCanvas






Большое количество методов класса TCanvas позволяют отображать различные геометрические фигуры с помощью свойства Pen. Если фигура замкнута, то ее поверхность закрашивается Brush. Все тексты изображаются шрифтом Font.

В процессе работы программы эти характеристики можно изменять. Так:

Arc(x1, y1, x2, y2, x3, y3, x4, y4);

рисует дугу:

 

 
 


Chord(x1, y1, x2, y2, x3, y3, x4, y4);

рисует сегмент из дуги эллипса и хорды:

 

 

Ellipse(x1, y1, x2, y2);

рисует эллипс:

 

Top
Left
FillRect(Rect);

- закрашивание прямоугольника:

 

Right
Rect: TRect;

Bottom
Left, Top, Right, Bottom

 

MoveTo (x, y);

- перемещает перо в точку с координатами x, y

 

LineTo(x, y);

- рисует линию из текущего положения пера в точку с координатами x и y.

 

x3, y3
x1, y1
Pie(x1, y1, x2, y2, x3, y3, x4, y4);

- рисует сектор эллипса:

           
 
x4, y4
   
     
x2, y2
 


Poligon(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;

 

Poliline(Point: array of TPoint);

- рисует ломаную;

 

RoundRect(x1, y1, x2, y2, x3, y3);

- вычерчивание и заполнение прямоугольника со скругленными углами

 

TextOut(x, y, S: String);

- осуществляет вывод строки;

 

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;

 

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

Для более простых графических операций используется компонент TPaintBox.






© 2023 :: MyLektsii.ru :: Мои Лекции
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
Копирование текстов разрешено только с указанием индексируемой ссылки на источник.