Сборник лабораторных работ по дисциплине "Прикладное программное обеспечение". Самохвалов К.М. - 53 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

53
местится в (100, 100), то есть, если выполнить команду «Canvas.LineTo(200,
100)»;, то следующая линия будет нарисована из точки (100, 100) в (200, 100).
Поэтому, если мы хотим рисовать линии несоединённые друг с другом, то
придётся воспользоваться методом MoveTo.
Линия, нарисованная при помощи LineTo, использует текущее перо
канваса (типа TPen). Основные свойства пера, это ширина –
«Canvas.Pen.Width := 4;» (при помощи которого можно задавать различную
ширину линий), и цвет «Canvas.Pen.Color := clLime;».
Рисование фигур
Для рисования фигур в TCanvas предусмотрены следующие функции:
ИМЯ ОПИСАНИЕ ПРИМЕР
Ellipse
Рисует эллипс, вписанный в невидимый
квадрат с координатами верхнего левого
угла и правого нижнего. Если координа-
ты х и y у углов будут совпадать, то по-
лучится круг.
Canvas.Ellipse(0,0,50,50);
FillRect
Заполняет прямоугольник цветом теку-
щей кисти (brush), но никак не за преде-
лами него.
Canvas.FillRect(Bounds
(0,0,100,100));
FloodFill
Заполняет данную область цветом теку-
щей кисти до тех пор, пока не будет дос-
тигнут край.
Canvas.FloodFill(10, 10,
clBlack, fsBorder);
Rectangle
Рисует прямоугольник (или квадрат), за-
полненный цветом текущей кисти и об-
рамлённый цветом текущего пера
Canvas.Rectangle(Bounds
(20, 20, 50, 50));
RoundRect
Тоже, что и Rectangle, но с закруглённы-
ми углами.
Canvas.RoundRect( 20,
20, 50, 50, 3, 3);

Страницы