Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования стр.34
Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования стр.34

(point, tip)

Dim pen As New Pen(Color.Red, 3) e.Graphics.DrawPath(pen, path)

Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования

Рис. 4.3 ▼ Патч

Рисование геометрических фигур

Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования

Обратите внимание, что в данном коде элементы обозначены как переменными типа Byte, так и своими числовыми значениями. Использование числовых значений избавляет от необходимости писать громоздкий код.

Сегмент

Сегмент строится методом DrawPie, который имеет следующие параметры: перо, экземпляр структуры Rectangle (то есть для построения сегмента необходимы параметры четырехугольника), угловой размер и стартовый угол. Ниже приведены различные варианты построения сегмента (рис. 4.4):

Dim pen As New Pen(Color.Brown, 3)

e.Graphics.DrawPie(pen, 10, 10, 150, 150, 330, 250)

Dim k As Integer

For k = 0 To 360 Step 120

e.Graphics.DrawPie(pen, 10, 300, 150, 150, k, 180) Next

Dim i As Integer For i = 0 To 10

e.Graphics.DrawPie(pen, 200 + 5 * i, 10, 200,

200 - 10 * i, 0, 180)

Next

Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования

Рис. 4.4 T Сегмент

ГЛАВА 4 Т Виды графических изображений Многоугольник

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

Dim pen As New Pen(Color.Black, 3)

Dim plg() As Point = {New Point(150, 10), New _

Point(100, 60), New Point(130, 60), New Point _

(100, 200), New Point(150, 150), New Point(200, 200),

New Point(170, 60), New Point(200, 60), New Point(150, 10)}

e.Graphics.DrawPolygon(pen, pig)

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

Прямоугольник создается методом DrawRectangle. Параметрами этого метода являются перо, координаты верхнего левого угла, ширина и высота. Вместо координат, ширины и высоты можно использовать экземпляр структуры Rectangle. В предлагаемом ниже коде приводится три способа построения прямоугольника.

Dim pen As New Pen(Color.Black, 3)

e.Graphics.DrawRectangle(pen, 10, 10, 150, 100) "способ 1 Dim rect As New Rectangle(10, 200, 150, 100) "способ 2 e.Graphi с s.DrawRect ang1e(pen, rec t) Dim recti As Rectangle "способ 3 recti.X = 10 recti.Y = 350 recti.Width = 150 recti.Height = 100


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta