Информатика. Индришенок В.И - 17 стр.

UptoLike

-17-
Того же результата можно добиться, если установить соот-
ветствующие свойства объекта Picture1:
значение свойства ScaleMode = 0 (User);
ScaleWidth = 14 (разность координат правого и левого краев);
ScaleHeidth = -10 (разность координат нижнего и верхнего
краев)
ScaleLeft = -7
ScaleTop = 5
Метод
Pset
[ИмяОбъекта.] PSet (X,Y)[, Цвет]
Задаются координаты точки и целое число типа Long для ко-
дировки цвета. Палитра цветов имеет до 16 кбит значений. Неко-
торые цвета обозначены через встроенные постоянные (констан-
ты) языка VB:
Цвет Константа Числовое значение
Черный vbBlack 0
Красный vbRed 255
Зеленый vbGreen 65280
Желтый vbYellow 65535
Синий vbBlue 16711680
Сиреневый vbMagenya 16711935
Голубой vbGyan 167776960
Белый vbWhite 16772215
Этот метод следует применять совместно с установкой свой-
ства DrawWidth (размер точки, целое число 1,2...) объекта Picture:
Picture1.DrawWidth=3
Метод
Line
[ИмяОбъекта.]Line(X1,Y1)-(X2,Y2)[,Цвет[,Флаг]]
По умолчанию Цвет совпадает со значением свойства объекта ForeColor.
Флаг= символ
B, тогда рисуется незаполненный прямоугольник,
если значение свойства FilleStile=1 (Transparent), или заполнен-
ный цветом ForeColor прямоугольник, если указанное свойство
имеет другое значение;
BF, тогда прямоугольник будет закрашен
указанным цветом. Толщина отрезка или контура определяется
свойством DrawWidth.
                               -17-

    Того же результата можно добиться, если установить соот-
ветствующие свойства объекта Picture1:
− значение свойства ScaleMode = 0 (User);
− ScaleWidth = 14 (разность координат правого и левого краев);
− ScaleHeidth = -10 (разность координат нижнего и верхнего
  краев)
− ScaleLeft = -7
− ScaleTop = 5
М е т о д Pset
[ИмяОбъекта.] PSet (X,Y)[, Цвет]
    Задаются координаты точки и целое число типа Long для ко-
дировки цвета. Палитра цветов имеет до 16 кбит значений. Неко-
торые цвета обозначены через встроенные постоянные (констан-
ты) языка VB:
        Цвет             Константа         Числовое значение
      Черный              vbBlack                 0
      Красный              vbRed                 255
      Зеленый             vbGreen               65280
      Желтый             vbYellow               65535
       Синий               vbBlue              16711680
     Сиреневый          vbMagenya              16711935
      Голубой             vbGyan              167776960
       Белый              vbWhite              16772215
    Этот метод следует применять совместно с установкой свой-
ства DrawWidth (размер точки, целое число 1,2...) объекта Picture:
    Picture1.DrawWidth=3
М е т о д Line
[ИмяОбъекта.]Line(X1,Y1)-(X2,Y2)[,Цвет[,Флаг]]
По умолчанию Цвет совпадает со значением свойства объекта ForeColor.
Флаг= символ B, тогда рисуется незаполненный прямоугольник,
если значение свойства FilleStile=1 (Transparent), или заполнен-
ный цветом ForeColor прямоугольник, если указанное свойство
имеет другое значение; BF, тогда прямоугольник будет закрашен
указанным цветом. Толщина отрезка или контура определяется
свойством DrawWidth.