Програмирование на Visual Basic
Информация - Компьютеры, программирование
Другие материалы по предмету Компьютеры, программирование
вого и нижнего правого угла вычисляются значения ScaleHeight и ScaleWidth. Применение метода Scale без параметров восстанавливает исходный масштаб окна формы и возвращает начало координат в верхний левый угол (0,0)
4.3.ГРАФИЧЕСКИЕ МЕТОДЫ
Для создания экранных изображений используются графические методы Line, Circle, Pset, позволяющие рисовать линии
и прямоугольники, дуги и отдельные точки на экране. объект форма, окно рисунка (pictur box), объект печати, на
которых рисуется линия или прямоугольник; Line ключевое слово;
Step ключевое слово, обозначающее, что начальная или конечная координата линии задана относительно текущей позиции, задаваемой свойствами CurrentX и CurrentY (отсчитывается как смещение от текущей позиции);
xl, yl координаты начальной точки рисуемой линии или прямоугольника (в используемой системе координат). Тип Single. Если отсутствует координата начальной точки, то линия нчинается от текущей позиции;
х2, у2 координаты конечной точки рисуемой линии (обязательные параметры). Тип Single;
цвет RGB-цвет линии (может использоваться функция RGB);
В определяет рисование прямоугольника по заданным координатам противоположенных углов;
F используется только при заданном параметре В и определяет закрашивание прямоугольника тем же цветом, что и линии сторон.
Синтаксис использования метода Circle (используется для рисования окружностей, эллипсов, дуг и секторов) следующий:
[объект.]С1гс\е[81ер](х,у),радиус[, [цвет] [, [start] [,[end}[, aspect]]]} где объект форма, окно рисунка (pictiir box), объект печати, на которых рисуется окружность, эллипс, дуга или сектор;
Circle ключевое слово;
Step ключевое слово, обозначающее, что центр окружности, эллипса, дуги или сектора задан относительно текущей позиции, задаваемой свойствами CurrentX и CurrentY (отсчитывается как смещение от текущей позиции);
х,у координаты центра (обязательные параметры). Тип Single;
радиус радиус (в используемой системе координат);
цвет RGB-цвет линии (может использоваться функция RGB);
start, end используются при рисовании дуги и определяют в радианах начальный и конечный углы дуги (диапазон от -2 П до 2 П). По умолчанию start равен 0, end 2 П. Для перевода значений углов из градусов в радианы используется формула ГРАДУ С*П/180.
aspect соотношение радиусов по осям Х и Y при рисовании эллипса.
Для рисования сектора задаются отрицательные значения параметров start и end. При рисовании проводятся радиальные линии под углом, заданными абсолютными значениями параметра.
Свойства FillColor и FillStyle (относятся к объекту) определяют соответственно цвет заполнения прямоугольника, окружности, дуги или сектора и стиль заполнения. Синтаксис применения свойства FillColor следующий:
{[/or;n.][c<w”-o/.]|Printer.}FillColor[= цвет] где цвет RGB цвет или QBColor функция (возвращает значение RGB цвета для 16 фиксированных цветов, см. Справочную систему Visual Basic). По умолчанию черный цвет.
Синтаксис применения свойства FillStyle:
{|/<wn.][con/ro/.]|Printer.}FillStyle[ = style] где style принимает следующие значения:
О полное заполнение;
1 прозрачное (по умолчанию);
2 горизонтальные линии;
3 вертикальные линии;
4 диагональ (направленная вверх);
5 диагональ (направленная вниз);
6 крест на крест;
7- крест на крест по диагонали.
Синтаксис использования метода Pset для высвечивания какой-либо точки определенным цветом следующий
[объект.] PSet[Step](^,^)[,uBeT]
где объект форма, окно рисунка (pictur box), объект печати, на которых рисуется точка;
Pset ключевое слово;
Step ключевое слово, обозначающее, что координаты точки заданы относительно текущей позиции, задаваемой свойствами CurrentX и CurrentY (отсчитывается как смещение от текущей позиции);
х, у координаты точки (обязательные параметры). Тип Single;
цвет RGB-цвет или QBColor-функция (возвращает значение RGB-цвета для 16 фиксированных цветов, см. справочную систему Visual Basic). Если этот параметр отсутствует, то Цвет определяется свойством ForeColor.
Толщина и вид рисуемых линий, а также размер и внешний вид точки определяется значением свойств DrawWidth, DrawStyle и DrawMode. При значении DrawWidth = 1 (измеряется в пикселах) толщина линии и точки равна 1 пикселу. При увеличении значения толшина увеличивается (координата точки определяет ее центр). Значения свойства DrawStyle от 0 до б определяют, какой будет линия:
сплошной, пунктирной, точечной и др.
Свойство DrawMode может принимать одно из 16 значений которые определяют характер взаимодействия вычерчиваемого изображения с уже имеющимся на экране. Например, по умолчанию DrawMode равно 13 (Copy Pen) и означает, что новое изображение закрывает собой существующее.
Метод Point возвращает цвет заданной точки. Синтаксис:
[объект.} Point (x,y)
Возвращает значение цвета в RGB-кодировке пиксела в заданных координатах х и у.
Рассмотрим примеры использования приведенных графических методов. Приводится текст процедуры рисования объектов на форме. Нарисованные объекты показаны на рис. 4.3.
Текст процедуры:
Private Sub Form_Pa-Lnt ( )
Scale (-10, 10)-(10, -10) установка масштаба
Line (-10, 0)-(10, 0) ось X
Line (0, -10)-(0, 10) ось Y
Line (-8.5, 9.2)-(9.01, -2.1) прямая линия Line (-5, 2)-(2, 1), , В не закрашен, прямоугольник Line(-8.5,3.5)-(-5.5, -4),,F закрашен, прямоугольник
Circle (1, 2), 5 окружность
Circle (-1, -5), 3, , , , 0.4 эллипс
Circle (-7, -9.5), 4, , -0.7, -2.1 малый сектор Circle (6, -6), 3.5, , -2.1, -0.7 большой сектор DrawWidth = 10 изменение ширины линии